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ABSTRACT 


This paper describes the design and implementation 
ог а meeroprocessor-based high-speed digital data 
acquisition and reduction system suitable for use in 
time varying signal analysis as encounters: in 
unsteady aerodynamic investigation. A microprocessor, 
Flexible disk drive and an ana lOr CEO чат 
conversion module were the main components which were 
аррепгасей cOutorm 3 32 channel 12 bit resolution data 
acquisition system capable of 1000 Hz sampling rate 
and permanently storing over 250,000 bytes of data on 
magnetic diskette. Subsequent to the data logging 
process, the same system was capable of serving as a 
general purpose computer utilizing the popular BASIC 


scientific programming language. 


Тағ system was qualified or accuracy and 
Ғалссіспаі регтогтатсе through a series of controlled 
əxercises, ard was then applied to an actual 


ООО tdsk со rurther determine its utility 


and vals, 
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Data acquisition systems have historically been both 
costly and cumbersome for the investigator to use. 
Кеа 57 слоп cf unsteady experimental data, as in the case of 
oscillatory flow investigation, was only possibile with the 
aid of expensive digital computer systems used in 


conjunction with elaborate analog recording devices. 


Within the past four years, a new form of computing 
power has become available to the engineer accompanied by 
such a reduction in cost that its use has spread rapidly 
пао а по = the realn of engineering design. The 
revolutionary device alluded to is the microprocessor, which 
in its basic form contains all the arithmetic and logical 
functions normally found in the central processina unit 
(CPU) or a large scale computer. Concurrent advances in 
solid state temory and other large scale integrated (151) 
Circuitry has enabled entire computing systems to be encased 
meble op enclosures at a fraction of the cost of the 


previously available minicomputers. 


This “document describes tne use of one such 
microprocsssor-based microcomputer system, the INTEL MDS-820 
Microcomputer Developnent System, as a central component of 
a data acquisition systen . The MDS was integrally 
C@mmecced Wich Various oeripheral devices including an 
аман со digital converter, input-output devices, anda 
dual 1162 SLE disk drive unit to form a data acquisition 
Svsten. The system was then qualified using known input 
= Оа << cf controlled harmonic content. Subsequently the 


system was applied to an actual experimental situation, 








where unsteady analog signals were digitized, recorded, and 


later analyzed on the same self-contained computing systen. 
à glossary of terms commonly used in the instrumentation 


engineering, data processing and computing disciplines is 


presented in Appendix A. 
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An engineering design is, in general, the result of a 
directed effcrt in meeting a recognized human need or 
desire. The value of the design is usually determined by 
how well the design product satisfies a set of performance 
Grater lax. In most cases, several nethods of achieving the 
goal will be available, thus requiring the designer to 
choose among the alternative approaches. This choice will 
be governed or influenced by constraints imposed by the 


emy icontent, funding and production schedule. 


This section deals with the ‘definition of the need, 
specification ОБ the desired performance attributes, 
determination of viable alternatives, and the decision 
process by which the final product was developed. Although 
most of the desired performance reguirements were achieved, 
the project served as an educational experience revealing 
many areas which could be imoroved. Section УІІ discusses 
the design ип retrospect and proposes additional 
alternatives which could further enhance the system's 


performance. 


A. ретізіттоп ой {he "need" 


эг тг as a precipitant of “һе араса от 
Controlled Rotor (CCR) aerodynamic investigation being 
conducted by Naval Postgraduate School personnel. псе Lang 
wind-tunnel баба acquisition systems were designed “о 


Operate in the stealy-state flow-field environment. The 


ji 








desire to study the dynamic nature of the flow about an 
заво т of radical design, while experiencing the effects of 
an oscillatory flow-field, required a departure from the 
traditional hand logging or slow-speed automatic data 
acquisition methods. More inportant, however, the 
experimental process not only required investigation of the 
CCN EC various angles of attack and air speeds, as in the 
case of steady-state wind tunnel experimentation, but 
additionally a troduced frequency, cavity pressure 
modulation amplitude and phase relative to flow field 
oscillaticn as variables. Thus, the CCR experiment required 
experimental investiqation throughout an operating envelope 
bounded by 5 independent variables rather than the usual 2 
associated with steady-state flow problems. This obviously 
increased the magnitude of the data acquisition problem far 
bevond the point of vracticability for the conventional data 
logging methods at hand. A high-speed automatic data 
оо =senneaquemwas clearly in order. Additionally, іп 
order for large amounts of data to be efficiently analyzed, 
этэ inmperatiye that all information be recorded in a form 


Ш could ремитеесіу utilized by a digital computer. 


The above rationale then became the basis for the 


following statenent of the "need"; 


* A high-speed Ja ral data acquisition system 
еер (е performance attributes necessary to allow 
numerical analysis of the flow pattern about the surface of 
а ССВ airfoil section, operating in the Naval Postaraduate 


Пиве 2Z=foet py 2-=00t oscillatory flow wind tunnel 


норе on а5 а control ing device capable of 
automatically sequencing the Scanivalve mechanical 


Nuciplexcrs without operator intervention 


* Perform the algebraic calculations necessary in 


те WEIS the data to analyiic form 


ц 








В. Determination of Performance Specifications 


Anticipating a significant investment in equipment, and 
realizing that the ССВ research project would some day he 
complete, it was determined that the system design should 
take future applications into consideration. For” this 


reason, flexibility was incorporated as a major design goal, 


which necessarily resulted іп а modification of the 
specifications from those actually required for the CCR 
task. 


асела сг го Digital Conversion (A/D) 


n a typical data-sampling system, signal voltages 


Т 
еп шта varying physical parameters; e.g., pressure, 

оге, зоєітіоп, velocity and acceleration, are 

and converted via A/D converters into digital form. 
A/D conversion has become an engineering discipline in 
itself and an entire vocabulary associated vith the field 
has resulted. То assist the reader in understanding the 
following treatment of A/D performance requirements, a brief 
41с55агу of A/D terninology is included within Appendix A. 
In the interest of brevity, the discussion herein is limited 
to the most important facets of A/D conversion. тог а поге 
complete treatment of the subject, the reader is directed to 


J ап outstanding collection of A/D related articles. 


As а prelude to the below listed performance 
parameters, Fig 1 depicts all of the elements found in a 
Оса 70 conversion system and illustrates the type of 


nv 
errors associated with each stage of the process. 
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2. Number c 


jth 


Analog Channels 


The CCR experimental set up had one 


analog channel 
deoa cated to sach 


of the below listed signal sources: 


* Scanivalve ONE 


* Scenivalve TWO 


* Cavity Pressure Transducer 


* Hot Wire Annemometer 


A schematic of the signal flow is depicted in Fig 2. 


he four channels were to be sampled in fast succession at a 


P 
specified periodic rate. The A/D module had provisions for 
3 


2 single-ended channels or 16 differential channels. The 


single-ended mode was employed in this application. 
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“hen the analog signal is digitized, the resulting 
Dual quantity can take on only certain discrete values. 
The number of bits in tne digitized datum word determines 
the number of possible states that the word may have. An 8 
bit A/D, for example, can exhibit 2 to the 8th or 256 
states. If the range of operation of the A/D is.minus 5 “о 
plus FX volts, ИР Ес full scale), then each bit 
represents an increment of .0391 volts. This amounts to a 
тэс ЧЄ: сїї or quantization error of 0.391 percent. The more 
bits in the digitized word, the better the resolution; 
however, the price paid for increased accuracy is a decrease 
in conversion speed. Of course, speed and accuracy may be 


obtained concurrently with a corresponding increase in cost. 


The A/D module exnibited 12 bit accuracy, yielding a 
quantization STE OLE of 0.024 percent over full range 
operation. This corresponded Eo a sensitivity of 
Ека: 0.00248 volts during 10 volt full scale 
сена воп. TNe 12 b$t converter offers moderate accuracy 
НЕ ЕТ ат уе high speed, е.а. 75,000 conversions per 


second, for a reasonadle cost. 


ü. Ccnversion Pate 


The amount of time required for the A/D module to 
Sage = amd digitize the analog input is defined as the 
conversion time. The A/D module was capable of 75,990 
Mepit “conversions oer second, or one conversion every 13 
Microseccnds. This conversion rate was only obtainable if 
the Direct Memory Access (DMA) mode were utilized. Since 


the SINETRAC-800 module was operated in the program control 
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Meee, The ccnaversion rate was limited by the microprocessor 
instruction sequence execution time to 74.5 microseconds per 
Gommersion. The resulting throughout was 13,400 conversions 
рег second. The induced lag between channels caused 
significant problems in Signal reconstruction and is 


discussed in detail in section TV. 
E. The Processor 


The digital processor was the heart of the system 
design, and added tne flexibility needed to make the A/D 
conversicn, data acquisition and storage process applicable 
to the problem at hand. The desired functional performance 
requirements оі the processing unit are discussed in “115 


section. 


I. 32D control 


During the acquisition phase of operation, the 
puscossor's паза task was that of controlling the A/D 
module. өг Gonecrolling the acquisition process under 
programmed logic, adjustments to the sampling rate, channel 
samplinc sequence, and real-time filtering of the data could 


b2 easily effected. 


The reconstruction of time-varying analog signals 
+ 


frcm a set of discrete datum points represents a problem of 
significant maanitude. Probably the single most important 
consideration during the acquisition phase is the period at 


which samples are to be taken. When investigating periodic 
signals, frequency content is generally a matter of prime 
interest. Nyquist's sampling theorem states thart 


equi-spaced data, with two or nore points per cycle of the 
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highest frequency, will allow reconstruction of band-limited 
Functions. I£ this principle were not observed, а 
phenomenon termed "aliasing" could occur. The concept of 
aliasing is shown in Fig 3 which depicts a signal sampled at 
two different rates. The curves drawn through the two sets 
of points represent possible reconstructions of the original 
signal. The frequency change implied by the dotted curve is 


an "alias" of the frequency described by the solid curve. 
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Other considerations related to sampling rate are 
the number of data points required Гог adequate analysis, 
the amount of memory, permanent mass storage, and 


computation time required in processing the data. 


In the CCR application, it was predicted that 
fundamental driving frequencies in the range of 1 to 20 RZ 
should be investigated; and that frequency content up to the 
fifth harmonic would be of possible interest. This meant 
“that the system must be capable of sampling the analog 
channels at a minimum rate of 200 Hz. The resuiting design 


achieved a 500 Hz sampling rate over 8 channels. 
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III. HARDWARE 


ЖО oe SCO ST CROCOMPMTER DEVELOPMENT SYSTEM 


Tn ees basic configuration, the INTEL MDS-800 
Microcomputer Development System consists of a CPU, 16K RAM, 
SEINE IMC TAGS controller, front panel controller, 
power supply and enclosure. dith the exception of the 
enclosure and the power supply, each of the aforementioned 
izems is in the form of one or more printed circuit modules 
1 ay be inserted into the mainframe of the MDS. The 
S may ke directly connected to the following peripheral 
devices with minimal interfacing: CRT and keyboard console, 
high spee line printer, standard Teletype with paper tape 
reader and punch, high speed paper tape reader, and а high 
speed oaper tape punch. This section describes the 

ntial hardware elements of the system, an overall view 


Sen 1s shown in Fig 4. 
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СИБИ = 105-800 MICROCOMPUTER DEVELOPMENT SYSTEM 


‘= f 
s i E Е = 
тж Ја L Е Е 
>> Г 





1. Pandom access menory (RAM) 


— wap лю шш шы Жын заа A шшы <= — s r mm 


иде kes temp OERFOt БАЯ 15 а 16K byte module of high 
access rate volatile dynamic memory, where 1K denotes 2 to 
the 10th cr 1024 bytes. The MDS is capable of addressing 4 
such modules or 654K bytes of memory. ОЁ the 64K ої RAM only 
62K are actually usable due to the coexistence of a 2K block 
of read cnly memory (ROM) containing the MDS Monitor 


ргсагап. 


pue to the requirement for rapid recording of large 
blocks of data, the maximum number of RAM modules was 
installed. A RAM module is illustrated in Fig 5 and serves 
as an exampl2 of the typical insertable printed circuit 


- 


modules referred to throughout this paper. 
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ЕІСОВЕ 5 - 16K BYTE RANDOM ACCESS MEMORY MODULE 
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The INTEL Disk Operating System (DOS) consisted o£ 
three major components, а dual floppy disk drive unit, а 
j K Controller, and the DOS support software. The addition 
of the DOS provided dramatic increases in the flexibility, 


Speed, and mass memory storage available. 


Fach 7.5-inch diameter floppy disk (diskette) had a 
Capacity of 256K bytes of semi-random access storage. With 
ашэашеспа ў arive, over 0.5 million bytes of data, vrogran, or 
other information could be accessed with relative заза ап 


moderate speed. 


The software support package offered у INTEL, 
Called ISIS, was evaluated along with the Digital Research 
CP/M disX operating system. The Digital Research software 
package was chosen over the INTEL package due to the higher 
Speed it demonstrated and is compatibility with the BASIC- 


расхаде used in tne data reduction phase. 


СР/й "consists of several utility routines in 
addition to the Basic Disk Operating System (BDOS). These 
routines allow the user to form and edit disk files, 
programs or data files, to assemble and load assembly 
language procrams, anda powerful debug routine. А more 
complete descrhetion of the CP/M BDOS is contained in ref 
m 


санаа AA AE کڪ .= ھج کک‎ A eee о = шшш چ‎ s me | 


The basic MDS-800 was further expanded with the 


installation of a general purpose I/0 module. This module 











Ted fome input ports and four output ports of eight 
bits each. The need for the I/O module was anticipated for 
Seme rot adplications, digital input or outputs, controlling 
an X-Y plctter, or other general purpose applications. This 
module was actually intended for controlling the Scanivalve 
positioning under automatic channel sequencing. However, it 
was later decided that system flexibility would have been 


Sacrificed had this feature been implemented. 


1.  SINETRAC-800 ANALOG TO DIGITAL CONVERTER MODULE 


The Datel Sinetrac-800 A/D converter module isa 32 
channel, 12 bit resolution analog to digital module 
Specifically designed for use with the INTEL 405-800. Being 
Duss compatible with the MDS system, the nodule was 
installed within the MDS chassis and the wiring harness was 


brought со the backplane of the MDS enclosure. 


The main eiements of the A/D module were: 
e 32 channel analog multiplexor : 
à sample and hold 
а A/D converter sup-module 
e addressing and hand-shaking logic circuitry 


М Direct Memozy Access control circuitry 


ry 
my 
(D 


A/D module had three fundamental modes of 
SEEprodramn control 
а ¡program control with automatic sequencing 


s Direct Memory Access mode 


ference 1 contains a complete description of the 


= 
A/D module including operating instructions and programming 
с 
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Although the DMA mode was not utilized because of 
its requirement of an INIEL DMA module for support, future 
development of the system will make the addition of the DMA 
module indispensable. The use of DMA would allow the A/D 
Module to operate at its full capability of 75 KHz sampling 
rate. This increase in:acquisition rate would significantly 
extend the range of the system in terms of signal frequency 


component reconstruction. 


The біпеғгас-800 also provided user options in. 
certain operational parameter selection. Selectable by 
jumper wire were input signal voltage range (5, 10, or 20 
МОШЕ) , "single ended ог differential operation, and 
interrupt or non-interrupt operation. The options in use 
were: plus and minus 5 volt single ended, non-interrupt 
operation. Details concerning the use of jumper options are 


өресіттей in ref. 1. The SINETRAC-800 is depicted in Fig 6. 
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БОКЕ © — SINETRAC-800 ANALOG TO DIGITAL CONVERTER 
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The software development was accomplished in four 
distinct phases and involved the use of three different 
programming languages. This section briefly describes each 


language and the individual program modules created. 


A. LANGUAGES 


Every computer language has a level of application for 
which it was designed. The three languages discussed іп 
this section were used to accomplish varying degrees of 
Броснан control. A hign level programming language allows 
tne programmer to use nearly literal or sentence form 
eXpressions or equations. FORTRAN is an example of a high 
lsvel language. A low level language on the other hand, is 
шог у related to the machine code actually used by tne 
computer. Machine code is, of course, the lowest level 
programming language but 15 rarely used. Low level 
languages provide the programmer with complet? control over 


memory usace and CPU instruction sequences. 


1. 8080 А5 


Їр 
lesa 
іс” 
= 
|-4 
С 
Ш 
= 
IQ 
= 
- 
3 
D 


This low-level language was specifically developed 
pan wich tite 8080 nicroprocessor. Tt is, however, 
similar in form to assembly languages in use with other 
compute-s. The form of *he language is described fully in 

= 


О 
ЕЕЕ 10. ггегееото оліу the merits of the language are 





cesed herein, 


The use of assembly language offers the programmer 
direct ccntrol over the СРО instruction sequence. Very 
efficient utilization of available program memory and 
optimization of program execution time may Бе accomplished 
when employed. These features form the basis for the use of 
assembly language in the construction of the data 
acquisition and ASCII conversion programs, where execution 


time and memory allocation are importrant considerations. 


One distinct disadvantage to the use of assembly 
language is that the amount cf work required in producing a 
relatively short program may ре Significant. Several pages 
of documentation are necessary to make the program readable, 
even to the author of the program. Obviously, tracing 
another's assembly language program is very difficult even 


meth excellent documentation. 


PL/M is a medium-level language again designed for 
oprocessor use. It offers noderate control over the C?U 
ruction sequence while providing the user with many of 


scumes available only іп high-level languages. Тп 


> 
>" (D 
rt 


other words, PL/M 15 а language which permits the us=r to 


Scmine, within limits, the degree of control he desires. 


et 
The amount of machine code produced by PL/M compilation is 
about Бај: again that resulting from a Tunetienallg 
сапай. аззепріу language program.  PL/M is ideal for use 
when Zlcatinga point mathematical operations are Dot 
required, or when time and memory efficiency ага not 
и tant factors. 


(+ 
пу 
(D 


EL/M was used їп the Cons roct on 02 





communicatiions interface program called IFACE which linked 
the MDS-800 to the IBM-360 via telephone line. PL/M navy be 
assembled on either the IBM-360 or locally on an  MDS-800 


when equipped with the full complement of 64K of RAM. 


BASIC is a high level language which is gaining 
pn acceptance throughout the Seren tL fae community. 
За Заг со FORTRAN, BASIC provides the user with facility in 
programming mathematically complex routines in fairly 
BENE dar algebraic format. The BASIC-E compiler and run 
time monitor were developed for 8080 implementation to be 
Meee in conjunction with CP/M, and are fully described in 
ref. 5. 


ВАЗІС-Б was used in the data analysis routine which 
nay be easily modified to suit the user's needs. А summary 
of the commands available and syntax of BASIC-E can be found 


mme ref. 6. 


Б. ВИОСВЖМ5 AND DISKRETTZ FILES 


The fewer acquisition and reduction process was а 
multiphase sequence, each phase consisting of one or nore 
program executions. Each program resided on the system 
Q@mehette under its individual file папе. The system 
dWekette also contained the CP/M BDOS and each of its 
Әсізгей utility routines, the BASIC-E compiler and run 
time monitor. The system diskette was inserted into disk 
drive A, while the data diskette was inserted into disk 
шэвүэ В. Each program module and its associated support 


files is described within this sub-section, and Appendix Е 
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CoOmtalns a description of the operating procedures. 


1. CONTROL 


A control file called CONTROL was formed prior to 
each acquisition run. This file was edited and maintained 
om “Не system diskette and contained both text and control 
parameters that were used by the acquisition progran, 
ACQUIRE. The use of a control file eliminated the need for 
the operator to re-enter control parameters for successive 
Bus. A sample CONTROL file is contained in Appendix F. 
The order of the passed parameters was significant; however, 
the verkiage or content of the string variables could be 
entered free-form. The ACQUIRE program would only recognize 
and use the integer value of parameters which were preceded 
by a colon and followed Бу a carriage return linetfeed 
combination. The information following the first two colons 
was ignored, allowing the date and run number to be entered 
but not passed to the ACQUIRE program. The meaninas of the 
parameters are self-evident from the sample shown in 


¿crendix P, and are therefore not explained here. 


2, ACQUIRE 


ACQUIRE was the main - program which performed the 
ПЕЕ топ function. It would first read tha CCNTROL 
мэ oe 1155" drive Wand display it on the CRT for the 
сане = ceview. Should corrections or alterations De 
EPe@mrred, they could be effected at this time by editing the 
ОВО five, With the CONTROL file in order, ACQUIRE 
preceeded to extract the necessary control parameters and 
ПЕ =the CONTROL file on the diskette іп drive В. 
Using the extracted control parameters, this program then 


managed the operation of tne SINETRAC-800 module, СЕТ, and 
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EE drives unit so as to scan the specified analog channels 
at the specified rate and number of repetitions, and record 
ЕЛЕ data On the data diskette in disk drive B. The ACQUIRE 
program accomplished this task by issuing commands to the 
ЭВМФФКАС-800, followed by data to be written or read. The 
ЭВФКАС-800 was issued the initial and final channel 
NOSIS, а start scan command, and a start conversion 
command. When an analog to digital conversion was complete, 
mae SINETRAC-800 changed its status word to indicate an end 
Рсвептегсіоп (БОС). The processor would then read in the 
(ом bytes of data resulting from the conversion. Upon 
receipt of a subsequent start of conversion command, the A/D 
meule woul automatically step to the next analog channel 
to be sampled and perform a conversion. when the entire 
range of channels was converted, the A/D would change the 
EUs жога to indicate an end of scan, sinultaneously 
resetting the channel selection register to the initial 


channel. 


zm generation of the scan period timing pulse is a 
topic which deserves exdianation as it was one of “һе most 
 ЕГІСПІС ровстопс of the ACQUIRE routine from a programming 
standpoint. The MDS-800 front panel controller module 
mendes ап Interrupt timer which may be turned on or off 
Programmatically. The timer is actually a series of solid 
Беше counters Which, after receiving a certain number of 
Eus f-cmwthe 9.8 MHz system clock, issues a pulse to the 
CPU. This interrupts the operation of tne 8080 CPU, causina 
Tepr ogra to executa a subroutine. This subroutine пеп 
counts the number of interrupts received in this manner. 
When the number of interruots counted reaches a value which 
Matches +hat prescribed by the scan period control parameter 
Entared by the CONTROL file, a scan instruction is issued to 
ЕБІ Ә”ТҰЙАС-800 and a scan sequence is initiated. Zach 
ШОО гире оссцге< at 0.977 ams. Тэ fact Пас” the timor 


interrupts at nominal 1 as intervals became the limiting 
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Bator on scan rate. In order to increase the scan rate, 
some other means of initiating the scan must be used. The 
rationale for using the interrupt timer in the first place 
was that it provided, at no additional expense, a highly 
accurate time base, an important requirement for dynamic 


Signal analysis. 


Data from each conversion were stored in sequential 
RAM locations. When the specified number of scans had been 
perforned, the data stored in RAM were formatted and 
transferred to the data diskette in disk drive 8. Each 
meek of scans was written into a file called DATA.nnn, 


where nnn was the decimal sequence number for that file. 


The process continued until all Scanivalve channels 
were sampled and logged, the diskette space was exhausted, 
or the process was terminated by the user. If the process 
were completed without mishap, a file called PROTECT could 
be written on the data diskette at the users option. The 
PROTECT file prevented further data fron being recorded on 


an unprocessed diskette. 


The EROTECT file, if it existed on a data disketts, 


prevented additional data from being written to the 
Е-ге, Погдайіу the PROTECT file was only removed from a 
diskette upon SlieGessntul completion of the reduction 
рг 


ocess. This procedure prevented unprocessed data from 
па inadvertently des=royed or overwritten. The PROTECT 


ШЕ also be removed by typing “SRA B: PROTECT” at the 
n 





цэ АУЛАР ТТТ) 


Each time the SCAN subroutine within the ACQUIRE 
program was executed, a DATA.nnn file was created on the 
дата diskette. This file contained the data stream which 
resulted from one run. At the completion of all the runs 
the data diskette would contain several DATA files. Рог 
example, а completed data disk directory might be as 
me | Оч =: 

COMPROL 

РАТА. 000 

ДАТА. 001 

РАТА. 002 ` 


PROTECT 


Ме firs: Џешру-есг of data on each DATA file form a 
ПЕНЮ: Бог that file, and contained the control information 
relevant to that file. The meaning of each byte within the 
header is listed below: 


Pye 0 initial Analog Channel 


Byte Final Analog Channel 
Byte Scanivalve One setting 
Byte Scanivalve Two Setting 
Byte No. of scans (LSB) 


зубе bo. Of Scans (MSB) 


= 
to 


(D 


Scan period (HSB) 


(+ 


ао) w 


е Frequency (LSB) 


х 


B "requency (1453) 


ct 


1 
2 
3 
y 
5 
Byte 6 Scan period (LSB) 
7 
8 
9 
A 


Y 
Y 
Y 
1 


ty 
ct 
(D 


through F rot used 


Subsequent data words formed the body of the DATA 


шше, A DATA £ile was conposed of binary information, and 





Phererore required translation into ASCII characters prior 


to being read by the BASIC reduction routine. 


5. CONVERT 


The CCNVERT program was an assembly language routine 
which read the desired DATA.nnn file into RAM, converted the 
binary values to ASCII decimal integers and created a file 
called DATA.ASC on the data diskette. This was necessary 
о то each execution of the REDUCE program, as the 
BASIC-E file handling would only accommodate ASCII coded 
disk files. This process could have been made a part of the 
ACQUIRZ program function; however, the additional number of 
bytes required for each data point would have severely 


limited the amount of data on 2ach diskette. 


The program was EXECU Sd су typing. "CCNVERT 
DATA.nnn" at the console. The resulting А5СІІ type file 
pd Бе viewed іп ган unformatted form by typing "TYPE 
aoe Ae. ASC". 


The REDUCE program was written in BASIC and was 


бесц-=а4 Бу typing "RUN REDUCE" оп the console. тез 
КИЕ vis to read the DATA.ASC file from the data 
diskette and perform the required numerical analysis 


E EE 00 extract the Fourier coefficients of the signal 
МАЈЕН ров represented by the data. The program used is 
x 


contained іп Ароепііх C and a discussion of the reduction 


4 


algorithm is presented in ref. il. 


tt is inportant to note that the BASIC routine used 


in this application may be easily modified to suit tire 
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user's needs. Рог that matter, an entirely different 


analysis alaorithm could b= substituted with equal facility. 


Џи - осе, the function of the program was not ОБ 
Siqmificance, however, it served as a vehicle for 
development: and testing of the systen. The demonstrated 
flexibility and ease in programming afforded b y 


incorporation of the BASIC language are the meaningful 


features. 


This PL/M program was originally written bv an 
unknown author but was adapted for use with the  MDS-800 


om ough modification of the interfacing routines. 


Its purpose was to allow the user to operate the CRT 


console as a remote time-share terminal in conjunction with 


ВИНЕ. Church 13H-350 operating under the Cambridge 
Monitoring System (CMS). The programa sting is included 
for docuaentary purposes in Appendix C. It also provided 


Но tcmgmatic by-directional transfer of disk files between 


the IBM and 4DS systems, a useful feature. 
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Any design, whether hardware, software ог а combination 
of both, must be thoroughly evaluated for performance under 
Semeerolled coniitions prior to its introduction in an actual 
field environment. The test which the design should undergo 
must exercise the device throughout its expected range of 
Operation so that actual performance limitations may be 
determined. OIL Cation testing also provides the 
designer with guantitative and qualitative measures of the 
System's corformance to the design criteria. This section 
discusses the qualification tests conducted on the data 
acquisition system, and an interpretation of the results 


obtained. 


Tne na in objective ОБ · Срем аба | ication testing 
procedur= conducted was to provide a level of confidence in 
E SENS ability to faithfully track the input signals, 
ET —perñitting the reduction routine to accurately 

erform numerical operations which would reconstruct the 
шашка Carameters of magnitude and phase, while filtering 
undesirarle frequency components. The three basic 


EuanizWeation tests сопацст 2а in the determination of the 


вуєбев'є terrormance characteristics are discussed below. 


РАНО ТОНЕ LIS RATION 


НІ 
tu 


Accoapanying the SINETRAC-800 D/A module was a voltage 
Calibration апа scan test software package. This program 


allowed verification of the accuracy of the A/D conversion 
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system when known (accurately measured) DC voltage levels 
re applied to the individual input channels of the A/D 


module. The results of this test, with the voltage range of 


* 


= 
Ф 


the device set at plus and minus five volts full scale, are 
shown іп Fig 7. This voltage range was chosen over the 20 
or 5 volt full scale range because the outputs of the signal 
conditioning amplifiers had historically exhibited bias and 
excursion characteristics which remained well within this 
range. dad а 20-volt full-scale range been utilized, 
Sensitivity would have been sacrificed, whereas a 5-volt 
range would nave resulted in an overvoltage condition on the 


2 соЯяүҮосгїёт circuit. 
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В. SINUSOIDAL SIGNAL RECONSTRUCTION 


This test was designed to evaluate the system's ability 
to accurately acquire, store, and reconstruct a sinusoidal 
input signal of known amplitude and phase relationship to a 


reference sinusoidal signal. 


Ene test was conducted using the simple operational 
amplifier circuit illustrated in Fig 8, representing a 


ss pass filter. 


The gain and phase of the output signal relative to the 
input signal were measured by using the Ballantine true RMS 
meter and an AD-YU phase meter, respectively. Thess data 
were hand locaed and plotted in Figs 9 and 10 for comparison 
with the gain and phase parameters extracted by the analysis 
algorithm discussed in section IV. A very high correlation 
between the extracted parameters and the analog measurements 


is clearly observable. 
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FIEUSE 0 - SINUSOIDAL SIGNAL RECONSTRUCTION TEST CIRCUIT 


43 





511П0538Н 1531 МНОТ15П38НІ15МО05384 МЇНЧ ЛН41П5ПМ15 - 6 331913 


SLI 





€ZH) АРЗМАПЯЗНА 


85! зе. І ий! ad 15 за и 
ps d 


ЗІ» 


азмпонзи -- O 
9315103481053 -- + 


(АМ 


лаги 


pG ° B 


1183 





SLINSSN 1531 МОТІНЭІЗІ ІНП ASHHd "àHJIUSTNIS - Hl 


(ZH2  AININDINA 
SLI Hs! 52.1 пи! зі. из 





азнп5нзй -- 0 
d3I1MNISNOSIB -- + 


34N ts 


St 


(934) 31548 35EHd 


15 





ПРИ ИВА WAVE RESPONSE 


This test was desiqned to evaluate the accuracy of the 
data acquisition System in reconstructing the higher 
hermonics contained within a periodic signal. Since a 
square wave is known to be composed of only odd harnonic 
components, with known relative amplitudes, these zsurlier 
coefficients derived from this test were easily compared to 


jmeOoretzcal results. 


By injecting tne square wave input into more than one 
A/D input channel simultaneously, a measurement of the 
interchannel sampling delay was possible through observation 
Of tne resulting phase shift between adjacent channels. 
Compensation for the artificially induced phase lag was 
accoaplashed Within the BASIC data reduction algorithm. 
II T Jn То 214 11, which illustrates the phase shift 
problex grapnically, delta t was the amount cf time require 
осом: со Ёгсп one A/D channel to the next and complete a 
Conversion: The softwares steps for the switching process 
amounted то 74.5 micro-seconds of apparent phase lag. Зу 
adding this value to the time term within the reduction 


10112 116 phase shift problem was nearly eliminated. 
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Real Time Origin 
Запрје 


| Channel O 


| a т 
“4 Apparent Phase Shift Due 


To Sampling Delay 


ЕЕ 11 - алел SR20R DUS TO INTSRCHANNEL SAMPLING LAG 


< 
МАМО ымы 
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и сло hdrmonezc ocoustrüctson test are 


The result 
shcwn in ig 


S 

B 12, which compares the extracted harmonic 
content СЕ the square wave as produced by the REDUCE 
routin2, with the theoretical expected values. The test was 
actually performed for several input frequencies ranging 
from 5 Hz to over 100 Hz, however, the resulting harmonic 
Бле cunis shown only for the 10 Hz signal so as to 


illustrate as many harmonics as possible. 
For comparison purposes, the phase shift realized with 


and without compensation within the analysis program аге 


ET EAE сасе a function cf frequency in Fig 13. 
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EDS SY S LEN 


Subsequent 
the 
actual experimental environment 


The 


the reduction algorithm, 


system was integrated into 


to the qualification tests and refinement 


APPLICATION 


or 
system was applied to “he 
for which it was intended. 


the CCR airfoil experimental 


Se up as illustrated in Fig ji. This phase of the 
development was conducted for two important reasons: 
* Evaluate the performance of the system under actual 


laboratory conditions in search of further improvment areas. 


the 


respect tc phase and anplitude while sinusoidally modulating 


ж Examine Coanda sheet pressure profile with 


В ато section. 


the olenum pressure of 


OBESATING CONDITIONS 


configured to operate with 


Only che 


The wind tunnel was 


сой during tris initial evaluation run. 


pressure of the airfoil section was modulated sinusoidally 
210 1211 driving frequencies rznging from 3.7 Hz to 13.7 
На. 

Previous work, presented in Reis 7 and 8, produced 
measurements of the Coanda sheet pressure profile using data 
from a true EMS meter. These data were hand logged and 
plotted. И == с гепеп- of the phase relationship was not 
possible using thi technique, as the phase meter was 


frequency range investigatel. 











Digital data acauisition, therefore, provided the first 
Opportunity for observing the phase shift between the 
driving zorc= and the pressure reaction on the surface of 
moe. airfoil. ELUNE ins Appendix=: is the CONTROL file 
used in this experimental run. 600 datum points were 
Eus at S>wilVisecond intervals for each analog channel. 


The channels sampled were: 
WW n 0.....Plenum reference pressure 
TST Scanivalve pressure (channels 10 thru 17) 


2. ёл 2.....Нойши ге аппетопетїег 


At each frequency, the Scanivalve was cycled along each 
of the indicated channels which corresponded to stations 23 
through 30 of the airfoil. The actual logging of the more 
than 86,000 data points required approximately 45 minutes, 
of whicn approximately 35 minutes were devoted to effecting 
ПОШ ОШОО Of, the tunnel operating conditions and driving 


frequency. 


Pigures 15 through 20 show the graphical results of the 
ОО АЕ ООС тог шусь Zollowed. Credibility 15 lent „коње 
results ру the ciose correlation achieved with the previous 
investigative efforts, aná the consistency displayed among 


Ше Ul SS of individual runs. 


The grephical results of the phase extraction process 
are presented for documentary purposes in Figs 21 through 
as not wui thin tke scope of this work to analyze іп 
detail the aerodynamics of the CCR. Therefore, the reader is 
Пеко о ЕЕ. 8 and 11 for more explicit information 


regarding the CCR analysis. 
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ИЗ!- 


„Ав 


ИБ- 


ass 


(5338939) 319N8 358Hd 





ЙІ 


МП1ї1П5141514 35HHd LASHS HANBO) 30H TIBLNAINUINNA EZ  39NIIYW 


МОГ LH LS 


ZH h'8 


= ANINA 


BSI- 


n3- 


ЙЕ- 


(8438034) 31848 35HHd 
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№М0140315151а зэнна јазно намно> зади Л1НЇМЗНН4МПА Нё 330914 


1. 


а 


5 


NI 1 LH.LS 


h 


ZH 5°8 





e A)N3INUJAS 


йВ1- 


Asl- 


Bz- 


25- 


ИЕ- 


(53348414) 31818 35819 
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МП1101Я4141514 ЗянННӨ ї1ззн5 намнпо запи Чнімзннампа SZ 33rn11.4 


МО! 1815 


ZH LAI 


= АУМЗПОЗМУа 


181! — 


ASI- 


ag- 


(5338934) 31988 35HHd 
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a = - ы ^w -—* ре «кш» 





и! 


МО гіпяіні5та Ззэнна іззн5 начно» завои лніманнамоа 92 3891914 


МО 1 845 





ZH L'EI 


= АМЗПМАУЗ 


ИН1- 


BSI- 


“ГА Бы 


аБ- 


ng- 


(5338930) 31948 35889 





VII. CONCLUSIONS AND RECOMMENDATIONS 


During the course of the acquisition system development, 
modifications were constantly пада with the intent of 
improving the performance or operator interface. System 
qualification and implementation disclosed several 
additional areas in need of improvement and, based on the 
E cUSrced gasmned up to the time of this writing, the 
upgrade items discussed in this section are believed to Бе 


меттау о: іпсіпсіоп in any further development or future 


generaticns of the sub ject system. In some cases 
alternative solutions to existing shortcomings are 
presented, taxina into consideration current industry 


develooments in compatible hardware modules. 


A. PUT ORC HANNEL SAMPLING LAG 


As previously discussed, the finite amount of time 
БЕЗЕ Еа ғор Ене ргосеѕѕог to switch from one analog channel 
to the next, and make a conversion, caused an apparent phase 
аса resulting reconstruction of two or more 
adjacent channel signals. This problem was partially 
overcome by time adjustments within the reduction algorithm. 
However, ас сштасјег were Still attributable -*o this 


problem. 
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Two additional approaches to the probiem remain: 


іти unterchannel Delay 


Pecan “a reduction in the  interchannel delay 
mame, thereby reducing the relative influence of the lag, is 
one possible solution. This could bs accomplished by the 
inclusion of a DMA module within the MDS mainframe to 
augment the capabilities of the SINETRAC-800. This solution 
аА попоп not absolute, would achieve a decrease of «Бе 
anterchannel delay from 74.5 microseconds to 15 


жісгозесопаз. 


маша аа бцаі Sample and Hold Circuitry 





The system as described herein contained only one 
запріг and hold circuit which was located downstream of the 
muitiplexcr unit. Since each channel shared the same sample 
an Il hold CICCULt,, ії was impossible to strobe all channels 
Simultaneously. Inclusion of an independent sample and hold 
circuit slement dedicated to each analog channel input would 
eliminate the phase shift problem completely, since all 
channels would be sampled at precisely the same instant when 
s oro DY a common source. The sample and hold circuit 
would maintain the DC level until the A/D was able to poll 
the individual inputs through the multiplexor. This concept 


мешале rated in Fig 27. 
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s/c 


s/c з/н м 


es C 


s/c 


Single Sample and Hold 





s/c 5/4 
S/C 5/ч 


Multiple Sample and Hold 


FIGURE - 27 SINGLE VS MULTIPLE S.MPLS AND HOLD CONCEPT 


TEL ر‎ 


ОМ 
Co 





ЕЕ SISTEN ACQUISITION SPEED 


BE "presented, the acquisition system was limited to an 
absolute maximum sampling rate of 500 Hz for more than one 
analog channel input. This rate could be improved for a few 
more Channels to a maximum Of 1 KHz with modifications то 
the timer interrupt and use of the program interrupt mode on 
эг 5112 5 ТтНАС-800. 


For any significant improvement, however, the actual 
бен of scan trigger would require alternate sourcing. The 
Er 5»odrd prowided for an on-board control of the scan clock 
ЕЕ па етлодегјлпа. А modification to the triggering of 
the scan clock could be effected with minimal additional 
circuitry of local design, utilizing a general purpose 
ЕШЕО- ТҮүзіпа circuit board for generation of a strobe or 
Sensing cf an external syncronization pulse. que is 
important +o realize that any such design should attempt to 
retain software control over the sampling rate so as not to 


Mose enl= flexibility feature. 


Tremendous reductions in software could be realized with 
the addition of the Direct Memory Access module. This 
addition wculd increase the maximum scan rate attainable 
ӘБЖ 5 (2 со approximately 11 KHz for б channels or from 1 


Шым tO 33 KHZ tor 2 channels of input. 
МИШ e the addition of a DMA module is highly 


recommended in consideration of the multiple imorovements in 


Sysroemperfosmance that it afrords for a modest expenditure. 
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|. DSTA RELUCTION 


The concept of locally reducing the data has папу 
advantagés, and likewise disadvantages, which must be 
considered in future modifications to the system. The 
decision to locally reduce data was based upon two major 
meros. Hirst, it was desired that the feasibility of 
local reduction оп а microprocessor be investigated. 
ео, during the design stages the only data 
communications link available to the W.R. Church computer 
nasty D9M-360 for remote processing was via Teletype 
speed (110 Бача) moden. Anticipating the generation of 
250,000 words of даға еасћ experimental session, 
transmission over the existing time-share system network was 
deemed unreasonable. Transfer of this volume of data would 
have required at best 7 hours real time, assuming minimal 
handshaking and system interruptions. The potential of 
generating several data diskettes during one experimental 
session renders a slow transmission rate link totally 
impractical. The СР/СМ5 system did not, at that time, 
exhibit the reliability necessary for such a link to be used 
effectively. До the Stine ог лаке опита the computer 
center was ccmpletinç the installation of communication 
links capable of 9500 baud. transmissicn rates. At this 
Bese а rull diskette (250K bytes) could be transmitted in 
as few as 5 minutes. This capability would greatly enhance 
the computing power of the system, considering the increased 
Sie tics ton of reduction techniques and output facilities 
Пос, high speed printers, etc.) which would then бе 


made available. Е 


Should the autonony of the system be an over-riding 


ООО lor, it is recommended that a high speed printer, 
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Вата] to Analog (D/A) podule Mand ал X T Dolotter Be 
included as suplementary system peripherals. The inclusion 
of an external mathematics module would further improve the 
system's computational speed and efficiency. Such a module, 
commercially available, would perform all floating-point 
mathematical operations (add, subtract, nultiply and divide) 
Mee Gircuitry external to the 8080 Microprocessor at 
approximately ten times the speed currently available. The 
addition of these modules and peripherals would upgrade the 
system into a completely independent, highly flexible data 
acauisition and computational device capable of a multitude 


ШЕ оаа Logging or analytical «tasks. 
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APPENDIX À 


GLOSSARY 


accuracy: The ability of a measurement svstem to 
determine the true level ог state of a variable in 


sha according to standards of reference. 
A/D: analog to digital (adjective or noun) 


Alias: When varying signals are’ sampled at equally 
Spaced intervals, two frequencies are considered to be 
aliases of one another if they cannot be distinguished 


from each other by an analysis of their equally spaced 


values. 

РОСТ: American Standard Code for Information 
шізевспапсде. This 15 а seven-bit-plus-parity code 
established by the American National Standards 
institute to achieve cpmpatibility between data 


сое. Also called USASCII. 


assembly: A listing which contains both source code and 


machine code. 


BAUD: A data transmission rate expressed іп BITS per 


second. 


Боинг EIA 11с1Т. À single unit of. information in а 


binary word. 


ЕЛ Group of memory locations used to store 


МИ с даға (input data, constants, output data, 
E 
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0. 


Mi. 


12. 


MS. 


14. 


15 . 


18. 


19. 


20. 


21 


222. 


русе: An eight-BIT word which is processed as a single 
quantity. 


ee. Central Processing Unit. The arəa of the 
microprocessor which computes and sequences all logic 


emd arithmetic functions. 


CRT: Cathode Ray Tube - А television-like picture tube 


used in visual display terminals. 
D/A: The inverse of the A/D process. 


DA: Ditect Memory Access - a facility that permits I/O 
вов directly into or out of memory without 
passing through the processor's general registers; 
her performed independently of the processor or on a 
1 


e-stealing basis. 
EPRCM: erasable/programmable read only memory 


nope Frequency: The lowest frequency which is its 
own alias, or that which is one-half the sampling rate 


when samples are continuously made at equal intervals. 
MOR 3wrut/output 

Е 10. 
Ех Which indicates a group of 1024 (2 ) items 
as in '4K of memory' meaning 4096 memory locations. 


МӘН: А difference in time of occurrence between two 


о 


machine code: The BIT patterns actually used by the U- 


oder to carry out its assigned logic functions. 


MODEM: MOdulator DE4Modulatcer - an electronic device 
which modulates signals transmitted over communications 


Src wi tS. 
BUX: a muitiolexing device 


nibble: The upper or lower four BITs in one nyte. 
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23. 


En. 


25. 


Жа 


E. 


28. 


9. 


30. 


page: a 256 byte segment of memory 


RAM: Random access memory. Volatile memory used for 


variable storage and data manipulation. 
register: A storage location located in the CPU. 


Resolution: The ability to determine signal differences 


muvarvrng signals. 
ROM: read only memory, non-volatile 


Sanple and Hold: A device for sampling the amplitude of 


a Signal at a given time and holding that amplitude. 


Samrling Theorem:  Nyauist's result that equi-spaced 
qata, with two or more points per cycle of highest 
frequency, allows reconstruction ОҒ band-limited 


Functions. 


software: The program which resides in the U-P's 


mencry. 
source code: The program written by the user. 


0-Р: штсгоргосеззог 
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APPENDIX B 


PROGRAM FLOW DIAGRAMS 


5 





ACQUIRE PROGRAM FLOW DIAGRAM 


RCRU I RE 


READ ' CONTROL’ 


TEIG 


DISPLAY 
! CONTROL! FILE 
ОМ СЕТ 


YES DISPLAY 
CHANGES Ñ 'EDIT CONTROL" 
NO 


КЕТЕ "CONTROL! 
FILE ON REBOOT TO CP/M 
DISK B 


Y 


SCAN 
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ACQUIRE PROGRAM FLOW DIAGRAM (CONT) 


SEND INITIAL 
CHANNEL ND. 
ТО SINETRAC 


INITIBLIZE AND 
STRRT 
TIMER 
















WRITE DATA TD НЕН) TIME 
DISX FILE AND STORE 
трата м IN BUFFER 


TIMER INTRPT 


yes 
CALL: TSYC 
INTRPT SERVICE 
SUBROUT INE 









WRITE PROTECT 
РИБЕ 
CN DISK B 





2 








ACQUIRE PROGRAM FLOW DIAGRAM (CONT) 





CONVERT PROGRAM FLOW CHART 


READ FILE NAME 
AND TYPE 
FRON CONSOLE 










OPEN AND RERD 
ENTIRE FILE 






CONVERT TWO 
BYTES OF DATA 


ОНТН.Н5С БИЕ 
ON DISK & 
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APPENDIX C 


PROGRAM LISTINGS 
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0000 
0001 
0002 
0005 


0010 
0010 
0011 
0011 
0015 
0012 
0012 
0015 
0001 
0080 
0000 


OOF 4 
GO > 
OOF 5 
OOF 6 
0077 
OOF? 
OOFC 
ООЁР 


0005 
0000 
0056 
0080 
0001 
0002 
0000 
ОООА 


< $0 we 6 


Фо зе же 


“о 
O 
-0 
= 
O 


ТОАТА 
TSTAT 
TCMD 
CDATA 
ООКАТ 
CCMD 


INTMSA 


RCLK 
; 
; 


ЕНТКҮ 
5001 
ТЕСВ 
ТЕШЕК 
ТХКРҮ 
RXRDY 
CR 

EF 


EQUATES 


EQU 
EQU 
EQU 
EQU 


3 >K >< >K >K >< >< >K >K >< >K >K >K >K >K K KKK K K >K >K >K >K >K >K >K RO K K K K o KK KK K 


FOR DATA ACQUISITION MODULE 


£ >K >K >< >K >K >K >K >K >K >< >K >K >K >K >K >K > >< >< > >< > >< > >K K >< > >K >K >K >K >K >K >K Xx > K KK K K 


PORT ASSIGNMENTS 


0 
| 
2 
É 


SINETRACK S00 ADDRESS ASSIGNMENTS 


EQU 
=Q U 
EQU 
EQU 
EQU 
EQU 
EQU 
LQ U 
QU 
EQU 
EQU 


GENERAL 


EQU 
EQU 
EQU 
ЕС 
= QU 
QU 
EQU 
EQU 


¿QU 
QU 
EQU 


10H 

BASE 
ВАЗЕ] 
ВАЗЕ + ! 
ВАЗЕ + 3 
ВАЗЕ +2 
BASE+2 
BASE+S 


l 
80H 
0 


170. а5З Ра ТЕО 


ОКАН ‚ТТУ DATA 
OF SH UV STATUS 

OFSH :TTY CONTROL 

OF 6H „СЕТ РАТА 

OF 7H “СЕТ STATUS 

OF 7H "CRT CONTROL 

OFCH : INTERUPT MASK 
OFFH "REAL TIME CLOCK 
EQUATES 

005H :EDOS ENTRY POINT 
OOH :EOOT POINT 

05СН : DEFAULT FCB 

080H "DEFAULT BUFFER 

| 

2 

орн 

ОАН 


; ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ ЖЖ ЖЖЖЖЖЖ 
BUFFER ALLOCATION & 


• 
$ 
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0100 
0100 
0103 
010F 
0110 
0127 
0157 
0150 
0162 
0175 
0193 
OlAz 
CIEE 
O1CD 
OTEO 
с 
0206 
Ве А 
0215 
021D 
021Е 
O 21 
0225 
2229 
022Б 
0220 
О22Е. 
DES 
0250 
9221 
0 52 
0255 
2000 


2000 
2001 
200 2 
2005 
2004 
2006 
2008 
200А 
2006 
0400 


0430 
0405 


(50004 
25241442046 31: 
ЕШ 55944946502: 
дина 55548 2005 53: 
44495245455 34: 
Or DBEDSALACHSGS: 
ODODODA1 AEMSG6: 
ODODOD4544MS G7: 
000000444 | М5 35: 
2449404220/5 310: 
АА | 7 441 20755! !: 
4147 47 4420/ 5612: 
(ПОЖАР 42 5 40118: 
ПРОБЕ 54PRICT: 
04541 405 6СА 18: 
00444154410ОАТА: 
00 гоз 
9000 TIME: 
0000 110» 
0000 aD TO. 
0000 POINT: 
0000 SONTHE: 
0000000000 ояк: 
0000 PAGER: 
00 HO DS: 
00 SVOU: 
00 5701: 
00 22110: 
00 SUMI: 
OQ FLAGO: 
00 61: 

DEDE 
00 I CHNL: 
00 FCHNL: 
00 SVU: 
00 SM 
0000 SCANS: 
0000 SCNRI: 
0000 КОС: 
0000 DUMY.: 
06000000 

Ба е 
ЕШЕРІР 
214207 


DO we че “е 


ORG 
JMP 
DB 
DB 
DB 
DB 
DB 
08 
DB 
DB 
DB 
рв 
рв 
DB 
ОБ 
DB 
DB 
DB 
DW 
DW 
DW 
DW 
DW 
DB 
DW 
DB 
DB 
DB 
Db 
DB 
DB 
DB 
ORG 


DE 
DB 
DB 
DB 
DW 
DW 
DW 
DW 
DW 
ORS 


LXI 
LXI 
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DATA ORGANIZATION 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


100H 
BEGIN 
"READ ERROR 9" 

whl te seh ӘНЕ Е 

201: S 

DIRECTORA А 

"INVALID INPUT PARAMETER $' 
ODH,ODH,ODH, "ANY CHANGES? Y/N $ 
ОВО ODHT EDIT COXNTROLTFILES 
ODH,ODH,ODH,'DATA DISÁ PROTECTB 
ERIS SVO S UTE 
"DATA TRUNCATED 5" 

SUD" RUN? а >” 


VARIABLE AREA 


U, CONTROL ООО ООО 
ОЛЛГЕОТЕСТ SOOO OOO 
O, 'CALVALU ОООО Оо О 
О, "РАТА 0,0,00, 0,0,00 
0 

0 

0 

0 

0 Ва FOINIER 

0 "SCAN COUNTER 

0238705 05 059 : WORKING AREA 

0 :РАСЕЄ COUNTER 

0 ГЕСЕ STORAGE 

0 * INITIAL SCANIVALVE O B 
0 FINAL SCANIVALVE O POS 
0 * INITIAL SCANIVALVE 1 B 
0 sFINAL SCANIVALVe 1 POS 
0 :FLASO 

0 sFLA31 

2000H "START OF DATA AREA 

0 

0 

O 

0 

0 

0 

0 

0 

0,0 

400Һ ‘START OF PROGRAM AREA 


SP,IFFFH;INITIALIZz STACÁ 
СИС ТЕН ШЕГЕСІ Ул 






0406 
0408 
0408 
0402 
0411 


0414 
0417 
О41А 
0410 
0410 
041Е 
0418 
0420 
0421 
0424 
0427 
О42А 
0420 
0450 
9455 
0456 
0457 
0454 


0450 
0440 
0445 
0445 
0448 
0445 
044: 
0451 
0424 
0457 
045A 
045D 
0460 
0465 
0465 
0469 
0460 
0460 
0467 
0470 


2165 

520800 
220900 
CD1404 
C30000 


CD1705 
2118180 Ра 
3550 
a 

25 

ay 

25 

17) 

er 2202 
220220 
3А5002 
320320 
CD4108 
11$301 
CD1108 
Аг 
«69202 
525502 


110040 
= оре 
0200 
CDEIFS 
Ср:808 
241502 
Ср5 408 
00505 
5А0220 
CD2708 
CD0505 
340520 
С02708 
CDOEO5 
CDC 405 
282192 
Це 
0620 
за 

СЭ 


T we Фе 99 we we we 


ж 
UTO: 


АИО: 


MVI 
STA 
S D 
CALL 
JMP 


A , OC 3H 
08H 
OSH 
AUTO 
EOOT 


> > > x > > > > >< > >< > > ok 2k > >< >x >K IE ok Ж ЖЖ ЖЖ ЖЖ Ж ж Ж ЖЖ Ж ЖЖ ЖЖ ЖЖ ЖЖ 


AUTO = AUTOMATIC CONTROL SEGUENCE 
Hees ТНЕСЕЛІЗІ ГИ ТКО ЕТЕК IF 
IF VALID, SCANS THE SPECIFIED ANALOG 
CHANNELS AND RECORDS DATA ON DISK 


CALL 
CXI 
MVI 
MOV 
ЇМХ 
MOV 
INX 
MOV 
LDA 
STA 
LDA 
SIA 
CALL 
LXI 
CALL 
ХКА 
STA 
STA 


eel 
LAI 
MVI 
CALL 
CALL 
LHLD 
CALL 
CALL 
LDA 
CALL 
CALL 
LDA 
CALL 
CALL 
CALL 
PHL D 
МОМ 
SUL 
MOV 
DAD 
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жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


PRLOAD ¿VALID CONTROL FILE? 
H,DATA+9 ;ADDR OF EXTENSION 


A,'O'  ;ASCII ZERO 

M,A 

H 

M,A 

H 

М.А 

SVOO ;FETCH INITIAL CHANNEL 
SVO :INITIALIZE SVO 

$10 :FETCH INITIAL CHANL 
SV1 :INITIALIZE SVI 

CRLF :CARRIAGE ВЕТ LN FEED 
D,MSGIO ;"TIME,SVO,SVI" 
PRINT 

А :CLZAR ACCUMULATOR 
FLA3O  ¿CLZAR FLAGO 

БАЗІ ¿CLEAR FLAGI 


D,4000H ¿SET HIGH ADDRESS 
H,DBUF- 10H 

er 

OF SELF 
SETVLV 
TIME 
РЕНІ. 
ТАБ 
SVO :FETCH 

PHEX PRINT ASCII PAIR 
TAB 
SVI 
PHEX 
TAB 
SCAN 
POINT 
A,H 
20H 
H, À 

H 


SFETCH CURRENT TIME 
PRINT H,L ON CRT 


"КЕТОН BUFFER POINTER 


SKIFT LEFT ONE 











u 


0471 
0474 
0476 
0477 
0474 
0470 


047Е 
047" 
0480 
0485 
0486 
0489 
048С 
048F 
0490 
0495 
0494 


0497 
0499 
049C 
049F 
О4А0 
0445 


O4A6 
О4А8 


ОДАВ 
0%4Az 
04AF 
0482 
0485 


0486 
0458 
0458 
(ARI. 
O4BF 
04С2 


0465 
0407 


04CA 
04060 
04Cz 
04D1 
04D2 
0405 


02 7=.04 
ZI 
ES) 
Иво! 
CD1108 
E 


7C 
3C 
322D02 
210020 
110602 
Ср9207 
SAF O2 
47 
5А0220 
В8 
С2А604 


Sehr 
325202 
3А2Е02 
3D 
320220 
СЗАВО4 


ме 18 
CA9704 


ЗАЗ 102 
47 
5А0520 
58 
C2C 504 


ВЕРЕ 
525502 
545002 
50 
520520 
C3CA04 


FESO 
САВ604 


5А5202 
47 
5А5502 
AF 
АО 
C2F504 


AUT20: 


num 


АШТ22: 


АЦТ24: 


BUTSA: 


А 0132: 


AUTSA.: 


JNC 
MVI 
PUSH 
IX 
(REL 
POP 


MOV 
INR 
STA 
LXI 
LAI 
CALL 
LDA 
MOV 
LDA 
СМР 
JNZ 


MVI 
STA 
LDA 
DCR 
STA 
4МР 


CFI 
42 


LDA 
MOV 
LDA 
СМР 
JNZ 


MVI 
STA 
LDA 
DCR 
STA 
JMP 


CPI 


LDA 
MOV 
LDA 
MOV 
ANA 
JNZ 


84 


АЧТ20 
H,OFFH 
H 


Dymo a! | 


PRINT 
H 


A H 

À 

RCDS 

H ,DBUF 
D,DATA 
Wise Eis 
5201 
В,А 
SVO 

B 

AUT 22 


A,OFFH 
FLAGO 
5/00 

А 

SVO 
AUT24 


24 
AUTZI 


SV11 
В,А 
51 

В 
AUT32 


А,ОҒЕН 
FLAG! 
SV1O 

A 

SV] 
А0Т54 


48 
AUTSI 


FLAGO 
В,А 
FLAG 
CEA 

B 
EXIT 


аа FILE LENGIN 


; "DATA TRUNCATED" 


sNUMBER RCDS TO wRITE 
s INCREMENT BY ONE 
STORE IN RCD COUNTER 
POINT TO BEG OF DATA 
sDATA FCE 

sWRITE THE DATA FILE 
FEICH EST IO EE SCND 


; 

FCICH CURRENT SVO 
SAME? 

NG = DONET SET FLAGO 


"SET FLAGO 
:FETCH FIRST TO SCAN 


RESET CURRENT CHNL 


“MAX VALUE EXCEEDED? 
"YES - SET FLAGO 


LAST SVL TO SCAN 

° 

ЕО НЕДЕН SVI 

s SAME? 

«МО = DON'T SET FLAGI 


; 
“SET FLAG] 

‚КЕТОН IST TO SCAN 
"RESET CURRENT СНМ. 


“МАХ VALUE EXCEEDED? 
‚YES - SET FLAG! 


:FETCH FLAGO 
FETCH FLAG] 


52 0112-5112 
"YES = EXIT AUTO MODE 





0406 
0409 
O4DA 
O4DD 
0460 
О4Е1 
0464 


0467 
0428 
04Е9 
ОДЕА 
O4EC 
O4:F 
O4F 1 
0472 


0465 
04F8 
OAFE 
ОАРЕ 
0500 
0501 
0504 
0507 
050A 


0508 


050D 
050F 
0512 
0215 
9516 


0517 
О51А 
0510 
0520 
0525 
0326 
0227 
052А 
0528 
ОРДЕ 


540220 
5С 

520220 
5А0520 
SC 

520520 
212102 


1E 

3C 

17 
КЕЗА 
DASDOA 
5650 
2B 

CSE 704 


ШЕГЕ | 
CD1108 
CDFCO7 
E59 
CO 
N2001 
CD5106 
CDAZOS 
C9 


0698 


3E 20 
CD0508 
05 
C20D05 
С9 


CD5008 
1161001 
211020 
CD7007 
111020 
DS 

CD1108 
Èl 

Сррвоб 
CDDEOSG 


NEXT: 


NEXTIS 


EXIT: 


ТАВ: 


TABI: 


LDA 
INR 
STA 
LDA 
INR 
STA 
ESI 


MOV 
INR 
MOV 
CPI 
JC 

MVI 
DCX 
JMP 


LXI 
CALL 
CALL 
ral 
RNZ 
LAI 
CALL 
CREL 
КЕТ 


МУ] 


MVI 
CALL 
DER 
JNZ 
КЕ: 


SVO 
A ¿STEP ONCE 

SVO 

SVI 

A 

SVI ¿STEP ONCE 
H,DATA+11 ¿LOAD ADDR OF EXT 


A,M ;FETCH ASCII VALUE OF LSB 
A sINCREMENT ІТ 


M,A ¿RESTORE IN MEMORY 
pot SEXCEED 9? 
AUTIO ¿NO - SCAN AGAIN 


М,50: ¿RESTORE IN MEMORY 
H “СЕТ NEXT MSB 
NEXT!  ¡ADJUST NEXT WSB 


D,MSG12 ¿"GOOD RUN Y/N" 
PRINT 
CRTIN ¿SET CHAR FROM CONS 
"ps ‚YES RESPONSE? 

:NO - RETURN 


D,PRTCT 
SETFCB 

MAKE ; WRITE PROTECT FILE 
В,8 "COUNTER FOR 8 BLANKS 
4,208 3ASCII BLANK 

CRTOUT ¿SEND TAB CHAR TO CRT 
B 

TAB! 


; жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
PRLOAD - READS IN CONTROL FILE AND 


‚ * 


9 
$ 


• 
9 


FILO 


GREL 
LXI 
LXI 
CALL 
LXI 
PUSH 
CALL 
POP 
CALL 
CALL 
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РА 2012 501 10 


° > >K >K >K >< < >< K < >K “k >< >< é > >< >< >< K >< K < >K > >< >K >< >< Kk >< >< >< >< < K k >< >x c > >< > Ж 


LOGA “LOGIN DISK A 

D CNTRL ;PT TO CNTRL FILE ELK 
H,DBUF+10H ¿PT TO DATA BUFFER 
RDFILE ¿RD CNTRL FILE 
D,DBUF+10H 

D :SAVE 

PRINT  ;DISPLAY CONTROL FILZ 
H :RESTORE Н 

COLON | ;LOOK FOR FIRST COLON 
COLON ¿LOOK FOR 2ND COLON 





0251 
0534 
0555 
0538 
0535 
0256 
Шог 
0540 
0243 
0246 
0247 


О24А E 


0545 
024Е 
054F 
0552 
0555 
(226 
5257 
055A 
0555 
Goat 
ШООК 
0562 
0265 
0266 
0567 
056А 
056b 
ШЕСЕ 
ШЕСІ 
0272 
0275 
0276 
0577 
027А 
0575 
Оо ТЕ 
0578 
0582 
0585 
0586 
0557 
028А 
0585 
баба 


CDDBO6 
НЬ 
CDEJOS 
220420 
en 
CDDBO6 
Ë 2 
CDE306 
220620 


320020 
ЕЗІ 
CDDBO6 


SZZEOZ 
EI 
CDDBO6 


° 
9 
• 
ў 
$ 
9 
ў 


CALL 
PUSH 
CALL 
SHLD 
POP 
CALL 
PUSK 
CALL 
SHLD 
Bon 
CALL 
PUSH 
CALL 
MOV 
STA 
POP 
CALL 
PUSH 
CALL 
MOV 
STA 
POP 
CALL 
PUSH 
CALL 
MOV 
STA 
ROP 
CALL 
PUSH 
CALL 
MOV 
STA 
POP 
CALL 
PUSH 
CALL 
MOV 
STA 
POP 
CALL 
PUSH 
CALL 
MOV 
STA 
POR 


COLON 
H 
FLTHX 
SCANS 
H 
COLON 
H 


FLIHX 
SCNRT 
H 
COLON 
H 


FLTHX 
A 
ICHNL 
H 
COLON 
H 
FLTHX 
А, 
FCHNL 
H 
COLON 
H 


FLTHX 
ДҮ 
SV00 
H 
COLON 
H 


FLTHX 
А, L 
5701 
H 
COLON 
H 
A 
A,L 
SV10 
H 
COLON 
H 
РА 
А, 
SV11 
H 


;SFIND THIRD COLON 


sFLOATING TO HEX 
;SIORE HEX IN SCANS 


;FIND NEXT COLON 


;FLOATING TO HEX 
‚STORE IN SCAN RATE 


sFIND NEXT COLON 


; CONVERT 
SFETCH RETURNED VALUE 
:PUT IN INITIAL CHNL 


SFETCH RETURNED BYTE 


¿STORE IN FINAL CHNL 


;1ST SCANIVALVE O SET 


501010 АГ 2 ЕТ025ЕТ 


s IST SCANIVALVE 1 SET 


s I 5 SCANIVALVE 1 SET 


жжжжжж жж Ж ЖЖ ЖЖ ЖЖЖ ЖЖ ЖЖ ЖЖЖ ЖЖ ЖЖЖ ЖЖ ЖЖ ЖЖЖ ЖЖЖЖЖЖ ЖЖ 


CHECA WITH OPERATOR FOR VALID CONTROL 


КӨШЕР; 
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° K > > KK KK KK AK < > > > > > > > > > > o > c > > >< 





OS CN 
0292 
2295 
0298 
059А 
0590 


0 5 A0 
05А5 
05А4 
0247 
ОЗАА 
О5АО 
05Б0 
0555 
0554 
0557 
ОЗВА 
0580 
0200 
0205 


0504 
0565 
0266 
05С7 
05C8 
DOCE 
O5CD 
0500 
0502 
0505 
0508 
0205 
05 DE 
OJE | 
05-4 
Obs 7 
0928 


115001 
CD1108 
CDFCO7 
КЕДЕ 

шкод І 
C2DA07 


ЗАбБОО 
3C 

392D02 
CD5808 
ІШЕ 001 
С05106 
CDBEOS 
3C 

117501 
C2DA07 
| 1CDOI 
211020 
CD9507 
CS 


ES 

D5 

C5 

F2 
5А0020 
0511 
ЗА0120 
0512 
240620 
221002 
212005 
CD2E07 
240420 
222502 
24502 
22) 11181249 
222102 


LXI 
CALL 
CALL 
CPI 
LXI 
УМС 


0,М506 ¡“ANY CHANGES?" 
PRINT 
CRTIN ; GET CHAR FROM CONS 


21 :"NO" RESPONSE? 
D,MSG7 ;"EDIT CONTROL FILE" 
ERREX ¿EXIT PROGRAM 


У ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖжЖж 
WRITE THE CONTROL FILE ON DISK Б 
з ЖЖ ЖЖ ЖЖ ЖЖ ЖЖ A ЖЖ ЖЖЖ ЖЖ Ж ЖЕ ЖЖЖ ЖЖ Ж ж Ж Ж 


е 
$ 


, 
, 
, 
, 
, 
, 
, 
, 
, 
S 


САМ: 


SCANS: 


LDA 
INR 
STA 
CALL 
LXI 
CALL 
CALL 
INR 
LXI 
J NZ 
LXI 
CAI 
CALL 
REN 


PUSH 
PUSH 
PUSH 
PUSH 
LDA 
OUT 
LDA 
OUT 
LHLD 
SHLD 
LXI 
CALL 
CHED 
SHED 
LHLD 
CXT 
SHLD 


ot 


TFCB+15 ¿FETCH RECORD COUNT 
A 

RCDS ¿STORE IN MEMORY 

LOGE sLOGIN DISK B 

D,PRICT РТ TO PROTECT BLOCK 
SETFCB ¿SET FCB 

SEARCH ¡SEARCH FOR PROTECT 

A "DOES IT EXIST? 

D,MSG8 ¿"DATA DISK PROTECTED" 
ERREX ¿YES - EXIT PROGRAM 


D,CNTRL ;PT TO CONTROL BLOCK 
ПРОТО аа сак INFO 
WR LEE sWn ere [CONTROLE TO Б 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
ОСАМ - 
ENTRY: 


COMPLETES ST SCANS OF 65 
SCANS = NUMBER OF SCANS 

ICHNL -INITIAL CHNL TO SCAN 
FCHNL - FINAL CHANNEL TO SCAN 
TINE FEE BIE TINE IN MS 
EIT, RE GIS VERSZUNCHANSEB 


° > > > >< >< > > > >< > > >< < > >K >< >< >< >< >K >< >K >K >K >K >< > >< >< < >< >< K >K > >K Xx < >< > 2k 2k 2k 


H 
D 

B 

PSW 

ICHNL FETCH INITIAL CHANNEL 
START ¿SET IT 

FCHNL ¿FETCH FINAL CHANNEL 
FINAL ¿SET IT 

SCNRT  3FETCH SCAN RATE 

TIMO "STORE IN TIME FACTOR 
H,SCANA ;GET INT SVC JUMP 
TIMER ;ENABLE INT TIMER 
SCANS X ;FETCH 4 OF SCANS 
SCNTR ¿PUT IN SCAN COUNTER 
TIME ‚КЕТОН TIME 
H,DBUF+10H ; ЗЕТ DUFFER LOCAT 
POINT ¿STORE IN POINTER 





ODED 
OSFO 
OS | 
05Ғ2 
ӨӨР5 
0588 
0589 
O5FA 
ОБЕВ 
ОКО 


OSFD 
[DRE 
ШОНГ 
0600 
0601 
0604 
0607 
060А 
0606 
060: 
0611 
0612 
@ 15 
0616 
0617 


0618 


061A Ss 


0616 


0610 
SONE 
0621 


Сез = 


0625 
0628 
062A 
062Е 
0620 
OG Ze 


0651 
0655 
0654 
0655 
0657 
0658 


0659 
0655 


242502 
TC 
52 
082005 
306907 
F1 
Cl 
Dl 
Е | 
С9 


E) 

05 

05 

F 5 
2А0620 
221002 
22102 
5200 
0519 
2-1ЕО2 


DE10 
£680 


SCANA: 


SCANO: 


ЭСАМ | : 


SCANS: 


SCAN4: 


LHLD 
MOV 
ORA 
JNZ 
CALL 
POP 
POP 
POP 
POP 
RET 


PUSH 
PUSH 
PUSH 
PUSH 
ERED 
SHLD 
LIED 
Y VI 
OUT 
LDA 
MOV 
INX 
LDA 
MOV 
INX 


OUT 
MVI 
NOP 


DCR 
JNZ 
IN 

АМ] 
JNZ 
MVI 
I NX 
MVI 
INX 
JMP 


IN 
MOV 
INX 
IN 
MOV 
INX 


IN 
ANI 
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SCNTR 
А,Н 

L 
SCANS 
TIMOFF 
PSW 

B 

D 

H 


H 

D 

B 

PSW 
SCNRT 
TIMO 
POINT 
А, ОСМО 
DSTAT 
TIME 
М,А 

Н 

ТІМЕ +1 
М, А 

H 


CONV 
А,2 


А 
SCAN 
DSTAT 
EOC 
SCAN3 
м, ООН 
H 
à ,00H 
H 
SCANA 


DDATA 
М,А 
H 


DDATA 
МА 
H 


pS low 
205 


sFETCH SCAN COUNT 

; 

sFINISHED? 

s;NO = KEEP SCANNING 
ЕИ ЕЕ ГОТ МЕ 


;RETORED 


50ЕТ SCAN RAIL 
“КЕЗЕТ ТІМОЦТ РАСТОВ 
GET BUFFER POINTER 
5 INITIALIZATION CMD 
"SEI ВЕТРЕ ОР 

om Ne 

SMA IN BUFFER 
OVE POINTER 

sGr Ia DE Y Е DNE EIS 
STORE DATA CELL 
Over OUNTER 


«START CONVERSION 
"SET DELAY COUNTER 
“EXTRA DELAY 


;QUIT LOOP? 
:NO - KEEP COUNTING 
:FETCH STATUS 


“YES - 30 READ DATA 
s INSERT ERROR FLAG 
MOVE POINTER 
:INSERT ERROR FLAG 
MOVE POINTER 

:READ NEXT CHANNEL 


SET LSE ОК DATA 
SIONS 

MOVE POINTER 
‘SEI NSB OF DATA 
SIOR 

UVES POLITE 


ЄРЕТСН STATUS 
“END OF SCAN? 





0630 
0640 
0645 
0646 
0647 
064A 
0648 
064С 
0640 
064Е 


0651 
0652 
0655 
0656 


0655 
0629 
065А 
0655 
065€ 
0650 
0660 
0661 
0664 
0662 
0666 


0667 
066А 
0665 
066С 
066F 
0670 
0671 
0674 
0672 
0676 


CA1806 
F22102 
2А2502 
28 
222502. 
ШІ 
C1 
DI 
E 


055C07 


E 
215000 
C5 
0615 


1А 
17 
25 
15 
02 
C25806 
АЕ 
52 (200 
СІ 
ЕН 


CS 


222902 
24 
20 
CD8506 
12 
15 
CD8506 
12 
15 
CD8506 


SZ SCANO ¿NO - CONV NEXT CHNL 
SHLD POINT ¿STORE POINTER 

LHLD SCNTR ¿FETCH SCAN COUNT 

DCX H COUNT DOWN OWE 

SHLD SCNTR — ;RESTORE UPDATED COUNT 
POP PSW 

POP Б 

РОР D 

РОР H 

JMP TSVCO : RETURN 


 жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
SETFCB - MOVES AN INITIAL FCB INTO 


9 
9 
3 IFCB ARES 
; ENTRY: D,E = FILNAME BLOCK 
з жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж ж 
9 
СЕБЕБ 
PUSH H e SAVE 
LXI ЛАОС АН ВА ПИ Т ЕСЕ 
BUSH B SAVE 
MVI ENS «СОЕ ОМ Ге 
Sarr (i: 
LDAX D PE rn TO OVE 
МОМ M,A "STORE 1h TFCE AREA 
INX H "INCREMENTA 
ІМХ р sINCREMENT D 
DCR B з АДИО Ор 
412 Samil «= ОВЕ T ANOTHER EYI- 
XRA A sCLEAR ACCUM 
STA TFCB+32 
POP B 
ROR H 
RET 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж ж 
ДЕСНИХ ~ CONVERTS 6 BCD BYTES TO 2 HEX 


, 
9 
T Site SIA PCD BYTES SIARIING 
: AT 'WORÁ' 
5 Ж арна ВА полна 
з жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
9 
DECHX: 
E ШОК PONE TO AREA 
МОМ ШӘП ОПОРА р 
“оу DUE DUPLICATE TINIE 
CREL KE ETN 00117 Р Ф їХ 
STAX D ¿STORE IN WORK 
INX D OVAS ОВА POINTER 
CAEL HEXBIN ;CONVERT SECOND PAIR 
STAX D STORE ШОЛИ 
[INX D «МОМЕ POINTER 
CALL РОВ БПЛ CONVERT THIRD PRIR 


99 








0679 
067A 
0675 
067С 
0670 
Ф6ТЕ 
0681 
0684 


0685 
0686 
0687 
0685 
0689 
068А 
0688 
068С 
0680 


068: 
0691 
0592 
0695 
0696 
0699 
0696 


0690 
0640 
ОбАІ 
O6AS 
OSAS 
ОбА9 
OSAA 
O6AD 
0650 
0653 
0655 
0686 
0659 
0650 
4221-72 
O6BF 
06С0 


0661 


Пе 
15 
АЕ 
12 
13 
212202 
С08Е.06 
С9 


ТЕ 
17 
17 
17 
17 
23 
86 
25 
С9 


СрС906 


82-02 
PF 
1600 
210000 
CDC106 
ENB 
210900 
CDC 106 
3А2602 
1600 
D 
СЮС196 
5А2702 
1600 
ЭГ 

19 

C9 


0564 


STAX 
INX 
XARA 
STAX 
ЇМХ 
LXI 
CALL 
RET 


D 
D 

A CLEAR ACCUMULATOR 

D "LOAD ZERO IN WORK+3 
D : MOVE POINTER 

H , WORK 

BCD2HX 


; RETURN 


3 >K >< >< >K >K >< >< >< >< >K >< >K >< >K >K > >< >< >K >K XK ok ok oe ok ok oe oe ok XK o o oe e oo oe oe o oe o 5k Kk 


s SUBROUTINES - BCD2HX AND HEXBIN 
У ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ ЖЖ ЖЖЖЖЖЖЖЖ ЖЖ ЖЕ ЖЖЖЖЖжжж 


“Г. ее ее 
гг) 


XBIN 


BCD2HX 


DUET. 


ШЕШ ОО? 


• 
• 


МОМ 
RAL 
RAL 
RAL 
RAL 
INX 
ORA 
INX 
RET 


CALL 
INX 
CALL 
INX 
CALL 
CALL 
RET 


LDA 
MOV 
MVI 
LXI 
CALL 
XCHG 
LXI 
CALL 
LDA 
МУ] 
МОМ 
CALL 
LDA 
MVI 
MOV 
DAD 
КЕТ 


MVI 


90 


A,M SEE LOCH ее АЎ 


SLR TED РО НВ 
MOVE POINTER 

EIN IN) IG Wess La 
MOVE PON IER 
RETURN 


Е 


ECDBN 
H 
BCDBN 


H 
ECDBN 
MULT 


WORK 
Z,A 
р,0 
H,0 
MUL1O 


H,O 
MULIO 
WORK+ 1 
D,O 
Е,А 
MULIO 
WORK +2 
р,0 
Е,А 

D 


8,130 





0605 
0604 
0665 
06C8 


06C9 
06СА 
06СБ 
O6CD 
06СЕ 
06СҒ 
0601 
0602 
0605 
0604 
0605 
0606 
0607 
0608 
0609 
O6DA 


06DB 


06DD 
0696 
O6DF 
0622 


0625 
0625 
0556 
0627 
O GEA 


Обев 
О6:0 


00:20: 
19 


620506 
CS 
BCDBN: 

7E 

AF 
EGOF 
ОР 

19 
EGFO 
OF 

OF 

AF 

OF 

OF 

8l 

07 

83 

un 

CS 


• 
$ 
• 
9 
• 
, 
• 
$ 
• 
$ 
• 
$ 
• 
$ 


CORON: 
СЕЗА 

COLIC: 
BE 
28 
620905 
09 


*X] e we Фе we we we 


L THX: 


IRA 


DAD 
DCR 
ЈУ; 
RET 


MOV 
MOV 
ANI 
MOV 
MOV 
ANI 
RRC 
RRC 
MOV 
RRC 
RRC 
ADD 
RLC 
ADD 
MOV 
RET 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


COCON = FINDS TIME EXT COLON 5 


MVI 


СМР 
INX 
ЈМ 
КЕТ 


IN MEMORY STARTING AT H,L 
EAL is Дө ТО MEMORY 
POSITION AFTER ў 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


АТАУЫ 


V 
H 
COLIO 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж жжжжжжж 


FLTHX SCANS A ELOCS OF MEMORY FOR 


MVI 
PUSH 
PUSH 
LXI 
ХКА 


МОМ 
ЇМХ 
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BCD ASCII] CHARACTERS AND 
CONVERTS THEM TO A PAIR OF 
HER Yi 


`K K >< K K < >< >< >< > >< >< >< >< >< XK KK >< >< >< k >< K >< < >< >< > > < IK  * * > > * >< K kK K K K 


ENS EIT LOOP COUNTER 
ћ SAVE 

B ‘SAVE 

HI VORS INITIALIZE 

А : WORK 

М,А : AREA 

H : ТО 





Обер 
OSEE 
06Ғ1 
ока 


0625 
06Ғ4 
0676 
0679 
OSFB 
OGRE 
0700 
0702 
0705 
0706 
0708 
0708 
9706 


O7OF 
0710 


07135 
omo 
0716 
0717 
0718 


0715 
071C 
OI: 
OF 
0720 
0721 
0722 
г Э 


0728 
0728 


05 
ӨСЕВО6 
Cl 
gl 


TE 
E20 
CAOFO7 
F EOD 
СА1507 
E SFO 
20 
C22807 
ТЕ 
ШЕЗА 
F22807 
05 
FA2807 


25 
СЗЕ506 


5206 
90 

47 

215 
112А02 


E 
РОДЕ 
12 

18 

25 

05 
C21507 
С55706 


115701 
C3DA07 


ADOOS 


FETTO: 


muros 


12129: 


TS O 


DCR 
JNZ 
POP 
POP 


MOV 
CRI 
JZ 
СРІ 
42 
АМ] 
СРТ 
JNZ 
MOV 
CEI 
JP 
DCR 
JÜ 


I NX 
УМР 


MVI 
SUB 
MOV 
DCX 
LXI 


МОМ 
ANI 
STAX 
DC X 
DCX 
DCR 
JNZ 
JMP 


LXI 
ЈМР 


FLTO4 
B 

H 

А,М 


FLTIO 
CR 
21120 
OF OH 
30H 
FLT30 
A,M 
ЗАН 
FLT30 
B 
FLT30 


H 
EOS 
А,6 


Б 


Н 
D,WORK+5 


A,M 
OFH 

D 

D 

H 

B 

ЕРЭ 22 
DECHX 


0,145 422 
ERREX 


; LEROS 


: RESTORE 
she STORE 


"РОСА КО CH R 

s IS IT A BLANK? 
ESTN GONORE TIT 

$15 IT A CARRIAGE RTN 
sYES QUIT SCANNING 
¡MASK OFF LOW NIBBLE 
SIS IT IN HEX RANGE? 
NGO = II IS AlN ERROR 
¢ FETCH THE WORD AGAIN 
ee о 

A SS O POP 
¡COUNT AS A VALID Hex 
SERROR IF > 6 NUMBERS 


У ОДЕ РАЈЕ МОК РОДИ 
;SCAN AGAIN 


, 

COMPUTE # DIGITS 
STORE IN B 

:BACK SPACE POINTER 
:POINT TO WORK AREA 


‚КЕТОН NEXT LSB 
CONVERT TO BCD 
*STORE IN WORK AREA 
"MOVE POINTER 

MOVE SOURCE POINTER 
"COUNT DOWN 

‚DO AGAIN 

"CONVERT ТО HEXBYTE 


; "INVALID INPUT FIELD" 


: ЖЖжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
TIMER - INTERUPTS TO SPECIFIED 
ROUTINE AFTER WN MILLISECONDS 


чө Фе Фё “че че че зе зе че “е 


we 


ENTRY: 


XIT: 


92 


= STARTING ADDR 


OF INTERUPT SERVICE ROUTINE 


nou 


TIIMEOUT IN MS 


REGISTERS RemAIN UNCHANGED 
СЕСЕ ROUTINE ГӘ EKECUIED 
ERUPT ROUTINE SHOULD LOOK 


LIKE 


NORMAL SUBROUTINE 
° >K >< >< KK K 





072 
0722F 
2752 
0754 
0756 
0758 
075А 
075C 
0756 
0740 
0741 


0742 
0745 
0744 
0745 
0747 
0749 
0746 
0740 
0720 
0725 
0754 
0757 
0758 
0759 


0726 
0750 
075e 
0760 
0762 
0765 
0764 


0765 
0768 


0759 
0764 
0766 
WEISE 
076Ғ 


Fš 
221802 
DEFC 
EGFD 
D3FC 
l2 
DSFD 
5-02 
DIFF 
BB 
С9 


5 

Э 

25 
5:02 
ШӘКЕ 
22.1502 
23 

== 1802 
2А1002 
2Б 
221002 
7C 

БЕ 
СА6507 


Е | 
DES 
звг0 
DSFD 
Fl 
ШЕ 
С9 


zAlrOZ 
Ë 9 


Ho 
2201 
DIFF 
2) 
CS 


TIMER: 


ее 9 же 


10: 


|. 


SHLD 
IN 
ANI 
OUT 
MVI 
OUT 
MVI 
OUT 


RET 


DI 
РОБА 
PUSH 
MVI 
OUT 
ERED 
INX 
SHLD 
IIED 
DCX 
SMED 
МОМ 
ОКА 
42 


РОР 
DI 

MVI 
OUT 
POP 
51 

RET 


ШЕ 
PERE 


GOTO 
INTMSK 
OF DH 
INTMSK 
A,12H 
OF DH 
А,О2Н 
ОКЕН 


"STORE JUMP ADDRESS 
SFETCH INT MASK 
ENABLE TIMER INT 
“SET INTERUPT MASK 


sÍNIT INT CONTROLLER 


START TIMER 


TIMER INTER UFT SERVICE 


PSW 
AUER 
ОКЕН 
TIME 


TINE 
TIMO 


TINO 
A H 


І5УСІ 


А,20Ң 
OFDH 
PSW 


GOTO 


DISABLE INTERUPTS 
‘SAVE A 


SRESEL TITER 

ого ыы 

s, UPDATE 

RESTORE 

ОЕ ПОТ COUNT 
"COUNT DOWN 

eo T 

GOEL OSE ОР COUNT 

OR WITH LSB OF COUNT 
si PI ST ROUTINE LEO 


RESTORE 

TESTOR INI LEVEL 
‘KES TORE 

“ENABLE INTERUPTS 
RETURN 


FETCH JUMP ADDRESS 
“EXECUTE JUMP 


 жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
ПОРЕ SEO MI SEU IOS 


, 
• 
, 
• 
ў 
9 
1 


I "OFF: 


PUSH 
MVI 
OUT 
POP 
RET 


93 


PSW 
А,ОЇН 
ОРЕН 
PSW 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж ж 





0770 
0773 
0776 
0779 
0773 


0770 
0780 
0781 
0784 
ОИВТ 
O78A 
0780 
0782 
0791 
0794 


0795 
0795 
0795 
0798 
ОТА] 
0744 
0745 
07A8 


ОТАВ 


Om A 
0751 
ЛЕ 2 


OWES 
0788 
0158 
078z 


222602 
CD5106 
CD6008 
AF 

321402 


22502 
BE 

CDC608 
Ср7008 
СрС907 
3A1A02 
B7 

CA7D07 
CD6808 
С9 


222502 
CD5106 
118000 
СрС508 
CDEEOS 
SC 

C2AE07 
COAEOS 


С06008 


22502 
ED 
CDCSOS 


CD8A08 
С0С507 
5А2002 
2411-1816 


5 жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
RDFILE - READ AN ENTIRE FILE INTO 


; ж 
ж 
2 
Ж 
gx 


EDDIE 


ADE TOR 


MEMORY 


eNTRY: STARTING ADDR OF MEMORY BLOCK 


SHLD 
CALL 
CALL 
XRA 
SIA 


LHLD 
XCHG 
CAEL 
CALL 
CALL 
LDA 
ОКА 
JZ 
CALE 
REL 


IN H,L 


ADDR OF FILENAME BLOCK IN D,z 
; Жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


PAGER 
SETECE 
OPEN 

А 
КОРО 


PAGER 


S2 TDMA 
READ 
HAFP G 
U EG 
A 
RDF10 
CLOSE 


"STORE POINTER 
OPEN FILE 
"CLEAR ACCUM 
CLEAR EOF FLAG 


FETCH POINTER 
PUT POINTER IN D,E 


READ A RECORD 
"MOVE PAGE INDEX 
sFEICH EOF FLAG 
:EOF FOUND? 

:NO - READ NEW РАЗЕ 
CLOSE FILE 

: RETURN 


° >< > > > < > > >< < >< k > >K >< >< >< >< > >< >< >< >K >< >K >< >< >< >K >K >< >< >< >< >K >< >< Ж Ж ж ЖЖ Ж Ж 


ў 
е 
M 
° 
ў 
е 
ў 
е 
ў 
е 
ў 
W 


RTOS.: 


RFO: 


WRF 15: 


Е 


WRFILE 
ENTRY: 


SHED 
CALL 
EAI 
CALL 
CAEL 
INR 
УМС 
CALL 


CALL 


[р 
XCHS 
CALL 


CALL 
CALL 
LDA 
LXI 


94 


= УВЕ в ЕО EOF EPIO 


NINBER ОБСЕ ЕСО ЕТО WRITE 
STORTING ADDR SOTIN ASCE 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж ж 


PAGER ¡SET UP PAGZR 

SETFCB :SET FCB 

D,80H 

SETDMA 

SEARCH ¿SEARCH FOR EXISTING 

A : WAS THERE A MATCH? 

WRFOS ;ҮЕЅ - SKIP MAKE 

MAKE "MAKE DIRECTORY ENTRY 

OPEN OPEN FILE 

PASER ;FETCH CURRENT POINTER 
«РИТ POINTER IN D,E 

SETDMA 

WRITE  ¿WRITZ A RECORD 

HAFPG.  ¿MOVZ PAGE INDEX 

RCDS : RECORDS TO WRITE 

н ,ТЕСВ+15 





0761 
0702 
0705 
0708 


0709 
О7СА 
07CD 
0700 
0701 
0704 
0705 
0708 
0709 


O7DA 
O7DD 
ОЕ О 
OME S 


9,4542 
07-8 
ОТЕА 
ОР 

OT 


0720 
07Ғ1 
OFS 
ОТЕ5 
0728 
РО 
OD 


Dc 
С2В507 
CD6808 
C9 


F ° 
2A2502 
118000 
19 
222502 
“Б 
CDC608 
= | 


C9 


С01198 
115000 
CDSS08 
550000 


Dor 5 
002 
CAL607 
DEF 4 
CS 


Г? 
ШЕР 5 
2601 
CAFOO7 


0584 
CS 


I.e Фо че w о 


AFP 9: 


[1] зе we we we we we 


а) 
-U 
[z] 
>< 


СМР 
JNZ 
CALL 
RE 


М 
WRF 15 
CLOSE 


;NO-WRITE NEW RECORD 
“CLOSE THE FILE 
: RETURN 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


SUBROUTINE HAFPSE = ADJUSTS DMA ADDRESS 
HALF PASE OF MEMORY 


PUSH 
ІШЕР) 
CAI 
DAD 
SHLD 
XCHG 
CALL 
ROR 
ЖЕРІ 


H 
РАСЕВ 
0,0128 
D 


PAGER 


SETDMA 
H 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


• ЗАМЕ 


, 

прва ев TO PAGER 

SIUE SR E UDDATDIEAGER 
УЦИ А НЕ 
«СЕТ ОМА 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж ж 


Tae Seems ERRORS EAL? VIA THIS 
Fil Y: DPR OI SINEESSASE ñDDRESS 
вот DOS 


EXIT: 
жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


CALL 
LXI 
CALL 
«ҮР 


PRINT 
D,TFCE 
CLOSE 
BOOT 


PRINT THE MESSAGE 
*TEMPORARY FCE 
CLOSE THE FILE 
ЕСЕ DOS 


У ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ ЖЖ ЖЖЖЖ ЖЖЖЖЖ AKK K K K kK k k 
DRIVERS #1/0 SUBROUTINES CONTAINING 


--і%е зө DO “зе че че 


-4 
< 
ІН 


TOU: 


IN 
Awl 
JZ 
IN 
RET 


PUSH 


ANI 
42 

ROR 
OUT 
RET 


22 


ТТҮ, 


CRT, 
> >< >< >< >< >< >< >< >< >K >< >K >< >< >< >< >< >< >< >< >K >K >K >< >K -K < > >< >K >< k >< >< >< x >< x < > > >x kK kK K 


DISX, 1/0 PORTS 


ВЕ ЕВЕ 


ПЕАТ 
доо 
TITEN 
ТОАТА 


Ром 
ТЭТАТ 
IXRDY 
Ti OUT 
row 
TDATA 


“шин эва Еб 
:IS RECEIVER READY 
"NO KEEP LOOKING 
:FETCH DATA BYTE 
"RETURN W/ EYTE IN A 


‚SAVE DATA BYTE 
:FETCH STATUS 
TRANSMITTER RDY? 

840 - WAIT UNTIL RDY 
'BRIN3 BACK DATA БУТЕ 
s OUTPUT TO TTY 
RETURN 





O7FC 
OPE 
0500 
0805 


0802 


0506 
0808 
0804 
080D 
080: 
0810 


0811 
0815 


0816 
0818 
081A 
0810 
ШЕГЕ 


0822 
0824 


0827 
0828 
0829 
0823 
0828 
0826 
082Е 
0850 
0855 


0854 
0855 
0856 
0855 
O08 A 
083E 
0856 
O08 3F 
0540 


0841 
0845 
0546 
0845 


ВЕЕТ 
2602 
CAFCO7 
рах б 


ino 


DBF7 
250] 
CAOGOS 
F1 
D3F 6 
CS 


0:09 
250200 


ESO 
FZOA 
D22208 
C630 
С50208 


0657 
050508 


ES 
OF 
OF 
OF 
OF 
CD1608 
Эй 
CD1608 
CS 


E) 
1C 
CD2708 
Е | 
Е 2 
70 
С02708 
БА 
CS 


5Е00 
С00508 
520A 
C30508 


CURTIN: 


CRTOUT: 


CRTI: 


PRIENT: 


PNID: 


PIO: 


PEA: 


PRHL: 


бар: 


оо sme Eon Tess 
RXRDY RECEIVER READY ? 
CRTIN 10 = WAIT UNTIL RDY 
CDATA FETCHES OU TETE 
PSW SAVE DATA BYTE 
CSTAT "КОРО баў a US 
TXRDY  ;TXMITTER READY ? 
CRIL „МО = WAIT UNTIL RDY 
PSW "BRING BACK DATA 
CDATA s, OUTPUT DATA 

s RETURN 
С,9 оО ЕО ВЕ 
ENTRY | ¿JUMP TO BDOS 
OFH "MASK LOW 4 BITS 
10 
P10 
و‎ 
CRTOUT 
'А' - 10 
CRTOUT 
РЭМ 
РМІБ 
PSW 
PNIB 
А,Н 
PHEA 
Н 
Н 
дэг 
РИЕЛ 
Н 
A,ODH ¿CARRIAGE RETURN 
CRTOUT 
А,ОАН ¿LINE FEED 
CRTOUT 








0845 
0840 


0850 
0855 
0855 


0858 
0855 
085D 


0860 
0865 
0865 


0868 
0865 
0860 


0870 
0873 
0875 
0878 
0879 
0874 
0876 
0875 
0880 
0885 


0884 
0887 


068А 
088D 
USEF 
0592 
0895 
0894 
0892 
0898 
OSSE 


089% 
089Ғ 
0842 
0845 


0843 
0848 


Or OD 
C30500 


110000 
Oz Oz 
650500 


110100 
Ones 
C30500 


115C00 
ОЕ ВЕ 
С50500 


115600 
0510 
650500 


115С00 
0Е14 
CDO500 
B7 

са 

3D 

C28 408 
SL OF 
221002 
CS 


0501 
С5рАО7 


І 15С00 
ОЕ 12 
CD0500 
57 

C8 

30 
C29208 
МОРО 
C30A07 


SD 

С2А508 
111C01 
С5РАО7 


то: 
C5DA07 


INTIAL: 


LOGA: 


10538: 


ОРЕН: 


CLOSE: 


READ: 


RD010: 


WRITE: 


ЫНО 10: 


кое 


MVI 
JMP 


LXI 
MVI 
ЫР 


LXI 
MVI 
JMP 


РАЈ 
MVI 
JMP 


ET 
MVI 
JMP 


LXI 
MVI 
CALL 
OR A 
ШЕ 
ОСА 
JNZ 
MVI 
STA 
RET 


EXT 
JMP 


l 1 
MVI 
CALL 
OR A 
RE 
DER 
JNZ 
LXI 
JMP 


DCR 
JNZ 
LXI 
JM? 


LXI 
УМР 


97 


5,153 
ENTRY 


D, 00H 
ЕШ 
ENTRY 


D,O1H 
ENTRY 


D,05CH 
С,15 
ENTRY 


D,05CH 
C,16 
ENTRY 


D,OSCH 
С,20 
ЕМТВҮ 
А 


А 

RDO10 
А,ОЕН 
EOFLG 


0,4551 
ERREX 


D,OSCH 
Cre) 
ENTRY 
А 


А 
“8010 
р,М5422 
ERREX 


А 

wa O20 
0.0555 
ERREA 


ERREX 


¡RETURN IF NO ¿RRORS 
SEN E O 
;NO -UNWRITTEN DATA 
> ВС 


, 


; 'READ ERROR' 


ЕО IE Маа БНО 


$ 


; 'WRITE ERROR” 


"ENDS SUIS 


5 DIRECTORY FULL’ 








ОВА 
0881 
0585 
0856 
0887 
0888 
0888 


019212 
0801 
0803 


0806 
08C8 


08СБ 


08Е8 
ОЗЕБ 
0855 
08F 1 
08F 4 
08F6 
08F9 
08FC 
O8FE 
0901 
0904 
0906 
0909 
090С 
090: 
0911 
0914 
9516 
0918 
0918 
0910 
germ 
0922 
0925 
0926 
ЕЭ 
0524 
092D 
0925 


115С00 
ОР 16 
CD0500 
5С 

CO 
112701 
C3DA07 


115C00 
Ое |] 
С50500 


ОЕ ІА 
С50200 


МАКЕ: 


SEARCH: 


SETDMA: 


че че че е 


4942 50555 4255: 


CD4108 
CEOS 
CD1 108 
CDFCOT 
Е6ОҒ 
222102 
CDFCO7 
Secor 
522802 
CDFCO7 
EGOF 
922902 
CDFCO7 
БОБОК 
э@@&0О2 
CDFCO7 
ES 

Fr EOD 
С2:8608 
AF 
322202 
5322602 
CD6706 
TD 
320820 
7C 
520920 
C9 


SETVLV: 


LXI 
MVI 
CALL 
INR 
RNZ 
LXI 
JMP 


CXI 
MVI 
JMP 


MVI 
4 Р 


D,05CH 
С,22 
ENTRY 
A 
D,MSG4 ;"DIRECTORY FULL’ 
ERREX 


D,OSCH 
car 
ENTRY 


С С 
ENTRY 


>< >< >< >K >< > >< K< >< >< >< >< >< >< >< >< >< >< >< >< >< >< >x ХЖЖЕЖЖЖЖЖЖЖЖЖЖЖЖЖжЖжЖЖ жж 


БОБИ | U =P JLOVS USER TO SET UP PROPER 
SCANIVALVE POSITION BEFORE CONTINUING 


DB 


CALL 
LXI 
CALL 
CALL 
ANI 
SI 
CALL 
ANI 
STA 
CALL 
ANI 
STA 
CALL 
ANI 
STA 
CALL 
ANI 
СРІ 
JNZ 
XRA 
SIA 
STA 
CALL 
MOV 
STA 
MOV 
STA 
КЕТ 


END 1008 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


IIS UTSEREQUENOY ТҮРЕ RETURN 5` 


CREF 
Ва 
PRINT 
CRTIN 
ОЕН 
WORK+2 
CRTIN 
OFH 
WORK+3 
CRTIN 
OFH 
WORK+4 
CRTIN 
OFH 
WORK+5 
CRTIN 
ТЕН 

(E 
SEIVEV 
A 

WORK 
WORK+1 
DECKX 
A,L 
SCNRT + 2 
А,Н 
SCNRT+3 





00F4 
OOF 5 
00Ғ5 
00F6 
00F7 
00F 7 


0005 
0000 
005С 
0080 
0001 
0002 
0000 
ОООА 


0100 
0100 
0103 
РОР 
РІС 
ГӘН 
0157 
0147 
ОБ 
013€ 
в = 
0160 
0162 
0164 
0166 
916C 
016Е 
Ol6r 


* 
x 


чө че 9 we we we 
x 
x 


$ 
ТРАТА 
DONT 
ICMD 
CDATA 
CSTAT 
CCMD 


we we 


, 
ENTRY 
BOOT 
Br GE 
ШЕШЕ 
ТХКРҮ 
RXRDY 


го 
3358 


x 
x 


x 
x 


259004 
41142055]: 
русе лор 4425 32: 
46455548 201525: 
444952454575 34: 
4441244120М5811: 
0044415441DATA: 
00 EKOFLa3: 
0000 ТЕ: 
0000 ТІМО: 
0000 JOTO: 
0000 рети: 
0000 SCNTR: 
9000000000%0К < : 
0000 РТР: 
00 RODS: 
0000 ESI. 


EQ U 
2С0 
EQU 
GU 
EQU 
EQU 
EQU 
EQU 


ORG 
JMP 
ОБ 
ШЕ 
DB 
DB 
a 
DE 
DE 
DW 
DW 
917) 
DW 
DW 
DE 
DW 
ОБ 
DW 


> 


EQUATES 


GENERAL 


003H 
00H 
OSCH 
080H 
l 

2 
ODH 
ОАН 


FOR CONVERT MODULE 


1/0 ASSIGNMENTS 


;TTY DATA 
:TTY STATUS 
"ТТУ CONTROL 
“СЕТ РАТА 
19:54 STATUS 
CRT CONTROL 


EQUATES 


РОДОВА POLNT 

EOOT POINT 

"DEFAULT FCB 

"DEFAULT BUFFER LOCATIO 


BUFFER ALLOCATION & 
DATA ORGANIZATION 


100H 


BEGIN 


VARIABLE AREA 


AD PERROS 
"WRITE ERROR $' 
DISK 27255 
DIREC TOKY FULL S' 
‘DATA TRUNCATED S$" 


О, "РАТА 


C CO о» OO O O O о 


",0,0,0,0,0,0,0,0 


BUFFER POINTER 
SCAN COUNTER 

№ *WORKING AREA B 
¿PAGE COUNTER 

RECORDS TO bE WRITTENS 
"LAST WRITTEN LOCATION 


• Ove we 





2000 
0400 


0400 
0405 
0406 


0409 
040€ 
040: 
0411 
0415 


0414 
0415 
0416 
0417 
0418 
0419 
041С 
0410 
041F 
0420 
0421 
0422 
0425 
0424 
0425 
0426 
0427 
0428 
0429 
0424 
042E 
042C 
042D 


53 87725 93 
CD0S04 
С50000 


118200 


0604 


215С00 


5600 
29 


1А 
n 
15 
25 
05 


C21404 


15 
55-20 
77 
25 
77 
25 
77 
25 
77 


DBUF + 


BEGIN: 


ORG 
ORG 


LXI 


CALL 


МР 


2000H ¿START OF DATA AREA 
400H START OF PROGRAM AREA 
SP, 1FFFH s INITIALIZE STE 
TRANS 

BOOT 


ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ Ж ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
I READS IN DATA FILE FROM VISA B 
CONVERTS EINARY DATA TO ASCII B 
ПАО ЕУ БАЗТО ROUTINE 


ej] we ФФ WO WO 99 wo 9 99 е 99 зе 99 99 


RANS: 


TRANI: 


ӘРБІР FILES 


ENTRY: 


EXIT; 


ви О а 1540211Е) Е 
SEM УУ ИЕ 

ЕЕ ГӘ ВЕРОНЕ TOS 
p IE 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


CONTROL BLOCA - READS IN SE 


NT ISSUED EY 5 ПЛЕН Le 


LXI 
MVI 
OXI 
"VI 
ТАХ 


LDAX 
MOV 
I NX 
INX 
DCR 
УМС 
INX 
MVI 
МОМ 
I NX 
МОЎ 
INA 
MOV 
INX 
МОМ 
INX 
LDAX 
MOV 
INX 
Lilx 
LDAX 
“OV 
INX 


100 


D,082H 
Б, 4 
H,O5CH 
М,0 
H 


D 
H 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


: ADDRESS OF PARAMETER L 
"CHARACTER COUNTER 
s ADDRESS OF TFCE 


“ҒЕТСН CHARACTER 
‚STORE IN FCB 

:STEP POINTER 

:STEP DESTINATION POINE 
FINISHED? 

:NO KEEP TRANSFERRING 





0426 
042F 
0450 
0451 
0455 


9454 
0455 
0456 
0457 


0454 
0450 
0440 
0445 
0446 
0447 
044A 
044D 
0450 
0453 
0456 
0455 
045А 


0420 
0460 
0465 
0466 
0468 
0469 
0 46E 
046С 
046: 
0471 
0474 
0477 
047А 
0470 
0480 
0485 
0486 
0489 
048С 
0487 
0492 


155 
LA 
IE 
0618 
АЕ 


25 
ТИ 
05 
(25404 


СрС405 
210020 
226601 
CDCCOS 
AF 

325501 
110020 
CDSA06 
CD6206 
2А6СО | 
ТЕРЕ 
19 

226,01 


22220! 
210020 
278601 
COEAOA 
CDEAOA 
CDEAOA 
CDBAOA 


IRAN2: 


JNZ 


== 


р 
D 
М,А 
B,24 
A 

H 
M,A 


B 
TRAN2 


“CLZAR A 


з ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ ЖЖЖЖЖЖЖЖЖЖЖЖЖЖЖ 
READ IN DATA FILE 


we we we 


CALL 
LXI 
SHLD 
CALL 
XRA 
STA 
LAL 
CALL 
CAEL 
ERED 
Е 
DAD 
SHLD 


LOGE 
H,DBUF 
PAGER 
OPEN 

A 
EOFLG 
D,DBUF 
SETDMA 
RDF10 
РАЗЕВ 


D OFF 7EH 


D 
LEAS 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


OG we ovens 

BUFFER ARZA 

SSEL PAGER 

ЗОРЕН FOR READ 

sCL2EAR A 

ог 2010-0225 1 220. 


¿READ FILE INTO MEMORY 


:SAVE LAST MEMORY LOCAT 


зжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


SEU? ТЕ 51ТТГО1гГЕ ЕР|ЕВ IN DEFAULT LOG 
г жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


• 
, 


LAI 
CAEL 
LXI 
MVI 
INX 
МУ] 
I NX 
MVI 
DAI 
САВЕ 
CALL 
CALL 
CALL 
LXI 
SHLD 
LXI 
SHED 
CALL 
CALL 
CAEL 
CALL 
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D,080H 
SETDMA 


H ,DATA-TS 


NS: 
H 
MESS 
H 
ТАЛЫ 
D,DATA 
SETFCE 
DELET 
MAKE 
OPEN 

H ,080H 
POINT 
H , DEUF 
PAGER 
GTONE 
GTONE 
GTONE 
GTONE 


: ADDRESS OF TEUFF 
‘SET DMA ADDRESS 
¿ADDRESS ОК ЕХІ 


"SET FILE CONTROL ELOCK 


¿ADDRESS ОЕ ТЬЏЕЕ 
‚SET BUFFER POINTER TOT 
‚ADDRESS ОҒ DBUF 





0495 
9498 


9499 
045€ 
049F 
04A0 
9445 
0444 
0442 
O4A6 
O4A7 
O4AA 
O4AD 


ОДАҒ 
0452 
04Е 5 
0486 
04E 9 


0 43 A 
04E D 
048: 
045 F 
0402 
0405 
0402 
04С8 
O4CA 
0405 


04С- 
040 | 
0422 
0495 
0404 
0405 
0408 
0409 
O4DA 


2AGFO! 
ЕБ 


CDCEOA 
2А6Ғ01 
ЕБ 
2А6С01 
ТВ 

95 

ТА 

SC 
029904 
2А6201 
2850 


CDF504 
2С 
C2AF04 
CDD405 
CS 


2АССО | 
ТЕ 

25 
22600! 
Sr 
2600 
CDODOS 
320 
CDF 504 
CS 


PASCO] 
2E 
Zo 
56 
23 
22560! 
ED 
AF 
EA 


CONVT: 


CONTO: 


Фе зе 99 99 


LHLD 
XCHG 


CALL 
LIED 
XCHG 
LHLD 
МОМ 
SUB 
МОМ 
SBB 
JNC 
LHLD 
MVI 


CALL 
INR 
JNZ 
CALL 
RET 


LAST 


GTTWO 
LAST 


PAGER 
A,E 

L 

A,D 

H 


СОМУТ 
POINT 
A, 0° 


SUE 
ЈЕ 

СОМ10 
CLOSE 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
ЗЕ. = Ань бя Е ЕЕ 


FROM DATA BUFFER 


CONVERTS TO ASCII IN ТБЏЕ 


TBUF 


IS РА ЕМ FULE 


$ жжжжжжжжЖжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


STONES 


LHLD 
МОЎ 
I NX 
SHLD 
МОМ 
MVI 
CALL 
MVI 
CALL 
RET 


PAGER 
A,M 
H 
РАЗЕВ 
я: 
H,0 
BD5 
А, * * 
STUFF 


ONES OE 

¿CLEAR H 

CONVERTI TO ASCII 
s INSERT COMMA 


S RETURN 


Ја KA K K 
TTWO - TAKES TWO BYTES OF BINARY DATAA 
CONVERTS THEM TO ASCII IN TBUF 

TBUF IS DUMPED WHEN FULL; 

ж Ж Ж ж >< >< >< >K >K K x< x< >< >K >< ж ЖЖ Ж Ж Ж ЖЖ >< >K >< >< * K >x >< < DICK >* >< >< xx *K x< x< >< >< KK KK 


чө есе 99 99 


GTT WO: 


LHLD 
MOV 
ЇМХ 
MOV 
INX 
SHED 
XCHG 
XRA 
ОКА 


TOZ 


AGER 
E 


‚М 


ое Е ГО 


ASER 


А 
H 


foe. LSE 

CET POINTER 
У sito Es 

У ПОДА РОТ УТЕНА 
so TORE IN PAGER 


"CLEAR A 
25211 NEGATIVE? 





0405 
04DE 
04DF 
04ЕО 
0422 
0425 
0424 
04:6 
0427 
0429 


04ЕС 
O4EF 
O4F 1 
04F4 


04Е5 
04F6 
0487 
04F8 
04Fb 
04FC 
04FD 
0500 
0205 


0506 
0209 
050A 
0506 
050C 


050D 
050Е 
0511 
0514 


F2ECO4 
2B 

7C 
gern 
67 

70 
Behr 
SF 
me D 
CDF 504 


CDODOS 
ЭР 0 
CDF 504 
CS 


E» 
05 
C5 
286201 
Т 
2C 
520605 
CDF605 
218000 


26201 
C1 
01 
E 


C9 


AF 

526601 
015008 
05005 


о НИЈЕ 


ЈР 
DC X 
МОМ 
XRI 
MOV 
MOV 
ARI 
MOV 
MVI 
CALL 


CALL 
MVI 
CALL 
ҢЕТ 


21110 
Н 

А,Н 
ОРЕН 
Н,А 
A,L 
OFFH 
L,A 
A,'-' 
STUFF 


BD5 
А,', 
STUFF 


«МО = DO NOT INSERT MIN 
: DECREMENT 

ОЕ ation 

SCOMEEENENT 

9 

NUBE 

sCOMPLEMENT 

RESTORE LSE 

MENUS SIS 

INSERT "=: 


¿CONVERT TO ASCII 


з жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
SITE SS IES CHARACTER PRESENT IN A 
INSERTS INTO TBUFF Al LOCATION 
БАНТ о TO EY POINT 

ЭНЕН T POISNISE 11091; BUFF=R IS DE 


$06 40 “е Фе “е 


ч 


STUFF, 


SHOTO.: 


PUSH 
PUSH 
PUSK 
LHL D 
MOV 
INR 
JNZ 
CALL 
CAI 


SHLD 
POP 
POP 
POP 
RET 


H 

D 

B 
POINT 
M,A 

L 
541110 
WRITE 
H,80H 


POINT 
B 
D 
H 


° < x < < O K< x < < > > x < X > ЖЖЖЖЖЖЖЖЖ 


STORE FINI BUFFER 


жжжжжжжжжжжжжжжжжжжжжжж жжжжжжжжжжжжжжжжжжжжжжж ж 

BINDEC - CONVERTS ONE OR TWO BYTES OF 
раманы каа 5 OR S ASCII DE 
CHARACTERS 

ENTRY: STORAGE ADDRESS IN D,£ 


С)” X X X X X X 


ХКА 
STA 
LXI 
CAEL 
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А 
WORK 


E, ODGF OH 


ВОА 


VALUE IN H,L 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 





9517 
051A 


051D 
0520 


0525 
0526 


0529 
052А 
052C 
сре" 


0550 


0551 
0552 
0555 
0554 
0555 
0558 
0559 
055A 
0555 
0536 
053Е 
054] 
0544 
0545 
0546 


0547 
0549 
054C 
054r 
05951 


(222 
0554 
0526 
0259 
0955 


OLIEFC 
CD3005 


OISCFF 
Ср5005 


OLFGFF 
CD3005 


70 
F630 
CDF504 
C9 


AF 


20 

24 

3С 

09 
045105 
3D 

68 

62 

47 
FEOO 
024705 
3546601 
Б7 

08 

78 


650 
CDF504 
ШЕР 
526601 
С9 


ШЕР 5 
2602 
СА2205 
DEF 4 
C9 


BDS: 


ED 


801: 


BDA: 
BDB.: 


ВОС: 


x 
x 


ь-| зе we woe we we we we 
+ 
x 


-4 
-< 
as 
=> 


ТООТ“ 


LXI 
CALL 


LXI 
CALL 


P. 
CALL 


МОМ 
ORI 
GREL 
ІІ 


ХКА 


МОМ 
МОМ 
INR 
DAD 
JC 

DCR 
MOV 
MOV 
MOV 
бая! 
JNZ 
LDA 
ORA 
ine 

МОМ 


ORI 
CALL 
MVI 
STA 
АШ 


DRIVERS 


IN 
ANI 
JZ 
IN 
КЕЛІ 
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B,OFC18H 
BDA 
B,OFFSCH 
BDA 
B,OFFF 6H 
BDA 


А, 
ЗОН 
STRE 


JI 


¿CLEAR A 


O - же 
(0) E 


> OP! 


"SAVE IN E 
:IS IT A ZERO? 

NO - STUFF IT 

SFETCH FLAG 

:IS IT SET? 

:NO - RETURN WITHOUT SU 


НООС QU II x OJ O) С ЕН 


> ж 
О О 
DO 
~ 


А,В 


30H 
STUFF 
А,ОЕЕН 


WORK "SET FLAG 


“2207: ца ша уе CONTAINING 
DOREA SA; I/O FORTS 


СА ОЗ це Б 


ТЄТАТ :ҒЕТСН STATUS 
RXRDY | 515 ВЕСЕІМЕВ ВЕАРУ WITH 
IJ 3NO KEEP LOOKING 
TDATA  ¿FETCH DATA BYTE 


SRETURN WITH bYTz IN а 





2 mE 


0256 
0550 
ОБЕ 
026 ! 
0264 
0565 
0567 


0568 
056A 
0266 
056Ғ 


ШӘТІ 


0572 
0574 
0576 
0579 
057А 
057С 


0570 
Op iF 


0582 
0584 
0586 
0589 
058Б 


058Е 
0590 


0593 
0594 
0592 
0296 
0297 
0298 
0595 
0596 
без 


Oo = 


05А1 
бээ? 
0282 
0545 
О2А7 
О2АБ 


E 
DBF5 
50 | 
CASCOS 


DSF 4 
CS 


DEF 7 
5602 
СА6805 
DEF 6 


i 


DEF? 
2601 
СА 7205 
i 
D3F 6 
C9 


0205 
350200 


SOE 
УДА 
DESE O05 
С650 
CS 7105 


0657 
G 105 


в 
ОЕ 
ОЕ 
Or 
ОК 
CD8205 
г 
CD8202 
CS 


Ср9505 


ӘКЕ 


CRIOUT: 


CRPI: 


PRIENT: 


PNTE: 


PIO.: 


PHEX: 


Ра 


PUSH 


ANI 
JZ 

ROR 
OUT 
Rei 


АМТ 
42 
IN 


PUSH 


IN 
ANI 
JZ 
РОР 
OUT 
RET 


MVI 
JMP 


ANI 
62271! 
JNC 
ADI 
JMP 


ADI 
JMP 


PUSH 
RRC 
RRC 
RAC 
RRC 
CALL 
POP 
CALL 


PUSH 
МОМ 
CAEL 
РОГ 
PUSH 
MON 
CALL 


105 


PSW ‚САМЕ DATA BYTE 


TSTAT PENCRAN STATUS 
TXRDY ОТНЕ ITER READY FORB 
TTYOUT ¿NO - WAIT UNTIL READY 
PSW SERING BACK DATA БУТЕ 
TDATA О Отт 
¿RETURN 
CSTAT ЕЕ ТОН СЕТ STATUS 
RXRDY s IE EI VIR E DY Wi rer 
CRTIN ;NO - WAIT UNTIL READY 
CDATA ЕО РВЕ е 
PSW Save DATA BYTE 
Са "mons P STATUS 
ТХКРҮ ЖЕТЕР КЕДІР FOR DYS 
CRT! EIE RATT UNTIL READY 
PSW SBRING BACK DATA 
CDATA s OUTPUT DATA 
RETURN 
S SET UT TOR BDOS CALL 
ENTRY оО 6005 
ОЕН MASK COW 4 BITS 
10 
Р:10 
"05 
CRTOUT 
"А" - 10 
CRTOUT 
PSW 
РМЇБ 
PSW 
РМІВ 
a 
PAPES 
H 
H 
Е 
EREK 








OSAB 
О5АС 


ОЗАР 
ОЗАК 
Бо 
0554 


ВЭБ 7 
0559 


05БС 
OSBF 
05С1 


05С4 
ӘС 7 
0209 


05СС 
OSCF 
OSD" 


0504 
00 07 
ро 


OSDC 
OSDF 
ОБЕ | 

28:4 
a= > 
0556 
0527 
OA 
0550 
Oper 


05Ғ0 
DNS 


US 

279 
дев 
Oars 
РР 
0600 
0601 
0604 
0607 


el 
CS 


SEOD 
CD7105 
SEDA 
С57105 


OEOD 
C30500 


110000 
(БАЈЕ, 
C 350500 


1 10100 
Ө ОЁ 
50500 


115С00 
О ОР 
650500 


115С00 
OE LO 
C30500 


115C00 
0:14 
CD0500 
Б 7 

CS 

5D 
CZFOOS 
SEE 
525501 
С9 


110501 
CSEFOG 


115С00 
0515 
C20500 
Б 7 

CS 

30 
C20A06 
1 ТОРО | 
С5ЕКО6 


CREF.: 


МГЛ: 


LOGA: 


LOGE: 


OPEN: 


CEO £: 


RDOTO: 


WRITE: 


«1010; 


POP 
RET 


MVI 
CALL 
MVI 
JMP 


МУТ 
МР 


LXI 
MV 1 
JMP 


LXI 
NVI 
JMP 


ЕДІ 
MVI 
JMP 


L 
MVI 
JMP 


EXT 
MVI 
CALL 
ОКА 
RE 
DCR 
JNZ 
MVI 
STA 
na 


L 


А 
4 


LAL 
MVI 
CALL 
ОКА 
RZ 
DCR 
JN 
LX1 
ЈИР 
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H 


A ,ODH 
CRTOUT 
А,ОАН 
CRTOUT 


>, 15 
ENTRY 


D , OOH 
С. Вл 
ENTRY 


D,O1H 
CEN 
ENTRY 


D ,05CH 
C ,15 
SIRT 


D,05CH 
CAE 
ENTRY 


D,OSCH 
0420 
ENTRY 
A 


A 
RDOIO 
A,OFH 
EOFLG 


D,MSSI 
ERREX 


D,05CH 
е, | 
ENTRY 
A 


A 
WROLO 
р,/562 
ERREX 


:CARRIAGE RETURN 


LINE FEED 


“RETURN IF NO READ ERRB 
‚IS IT Ah EOF? 
:NO MUST EZ UNWRITTEN A 
SET EOF FLAG 


9 


: 'READ ERROR" 


s ST IF NO ИЛТТЕ = Ка 
; 


; 'WRITE ERROR ' 


060A 
0606 
060Е 
0611 


0614 
0617 


061А 
0616 
061Ғ 


0622 
0625 
DSZ / 
062А 
0625 
0620 
Ове" 


0652 
0655 
0657 


063А 
0650 


0651 
0640 
0645 
0644 


0646 
0647 
0648 
0645 
064A 
064Е 
0642 
064r 
0652 
0625 
0654 


59 

(21406 
111001 
РОН Об 


22701 
CSBFOG 


015 
115С00 
С50500 


219600 
ОЕ 16 
CD0500 
56 

CO 
112701 
СЭЁТО6 


115000 
8/2 2l 
050500 


OE1A 
050500 


22 
21500 
C5 
0615 


ЈА 
77 
29 
[5 
05 
C24606 
Аг 
3271090 
СІ 
Би! 


Go 


WRO20: 


DELET: 


МАКЕ: 


S 


S 


• 
9 
• 
ў 
е 
3 
° 
, 
• 
, 
• 
, 


САЛОН; 


E TONA 


DCR 
JNZ 
LXI 
JP 


LA 
JMP 


MVI 
LAT 
МР 


LXI 
MVI 
байг 
I NR 
RNZ 
LXI 
УЧИР 


Er! 
MVI 


«ТІР 


MVI 
МР 


А 
WRO2O 
0,М533 
ERREX 


иг FULL” 


Pesos ee DI АТО о РЕ 


ERREX 


ex 
D,OSCH 
ENTRY 
D,OSCH 
С ,22 
ENTRY 
А 
р,м534 "DIRECTORY FULL' 
ERREX 


D,05CH 
CHER 
ENTRY 


сво 
ENTRY 


>< k >< >K >K >< >K >k >< > >x >< >< >k x< >< >K > >K >K >K >K >K >< < >K >< K >< >< >< k >< >< > >K >K K >< >x >< >x > > >< > 


ша єє 0 ти, 


INITIALIZATION BLOCAI 
ЇЕСВ АВ:А 


ENTRY: D,E = FILNAME BLOCK 


>k > >< >K >< KK >< > >K X >K >K >K >K >K >K >< >K >K >K >< >< >K >< >x >< >< >x IC K K 


ПЕВ: 


RUSA 
LAI 
PUSH 
MVI 


LDAX 
MOV 
INX 
INX 
DCR 
JNZ 
ХАА 
STA 
РОР 
ГОР 
Кем. 


H "SAVE 

MOSH з Дане: FILE CONTROL E 
B SAVE 

ЕЗШЕ го COUNTER 


Oh EYT TO BE TRANE 
Шеге Ты ТЕСЕ АҚСА 
SENERENENT H 

аец і В 

SIME ВОТ 

ЭН ШЕ- 50 POR ANOTHER Y 
sCLEAR ACCUM 


=> 


ао аць U) t" oT X co 
ES [гі 
©) -4 
Ш> x 
+ — 
Os 
N 


з жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж ж 


. 
$ 


ж 


RDRILE 
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ЭЛ ЭР» АХ 2NILTRSS@PLLE TINTO CONTE 





0655 
0658 
0655 
USE 
ОБЕ 


0662 
0665 
0666 
0669 
066С 
0662 
0672 
0675 
0676 
0679 


067А 
0670 
0680 
0685 
0686 
066$ 
068А 
0680 


0690 


0695 
0696 
0697 


0694 
0690 
О6АО 
0645 
О6А6 
0647 


226601 
Ср5ЕО6 
CDCCOS 
AF 

525501 


2АССО | 
EE 

Ср3А06 
CDDCOS 
CDAzZO6 
522201 
57 

СА6206 
CDD405 
CS 


226001 
CDSF O6 
118000 
Ср5А96 
CD3206 
5С 

629006 
CD2206 


CDCCO5 


2А6С01 
ED 


С05А06 


CDF605 
СрА:06 
ЗА6201 
216500 
БЕ 


C29A06 


‚ ж MEMOR Y 
‚ж ENTRY: STARTING ADDRESS OF MEMB 
x Пе ЈЕ 
x ADDRESS OF FILENAME BLO 
в жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
9 
RDFILE: 
SHLD PAGER TO LORE CURRENT POINTER 
CALL 2015 0Ё 
CALL OPEN Чац ае 
ХКА А sCLEAR ACCUM 
STA EOFLG CEZAR EOF FE AG 
RDF10: 
EHED PAGER 1: 10170 84ЕНТ РОТАМТЕН 
XCHG UT POINTER TIN D,E 
CALL SETDMA 
CALL READ "READ A RECORD 
CALL HAFPG ПОЧЕ РАСЕ INDEX 
LDA EOFLG sFETCH £OF FLAG 
ORA A sEOF FOUND? 
42 RDF TO :NO = READ ANOTHER PAGEL 
CALE CEOSE "EUST S 
RET "RETURN 


; жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
wRFILE - WRITE A BLOCK OF MEMORY IN AF 

ENTRY: NUMBER OF RECORDS+! TOW 

STARTING ADDRESS IN H,L 
жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


= we We wt we we w 


ПЕЕ • 
SHLD PAGER domm WP PASSR 
CALL О ОРИ а O 
LXI ОЮ, ОН 
CALL SEID 
CALL SATO А Чен FUR EXISTING FL 
INR А ВС пала А МАРСУ 
J NZ WRFOS О = SKIP MAKE FUNCTO 
CALL MAKE еш DIRECTORY ENTRY 
WRFOS: 
CALL OPEN ОРЕН ЕТЕ 
МКР 10: 
PAD PAGER аа CURRENT POLNITER 
KCHG аш N TER ОН ОЕ 
CALE Sc TDMA 
МАЕ 15: 
CEEL WRITE su [I S PA RECORD 
CALL HAFP 3 ара азе INDEX 
LDA RCDS Еол NUMBER OF RECORS 
LXI H ане 
CMP M 
NZ WRF15 оре ГТ ANOTHER REO 
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А> 


ОбАА 
O6AD 


O6Áz 
OSAF 
0682 
0685 
0686 
0659 
O6BA 
0680 
068: 


OGBF 
Q6C2 
06C5 
0608 
OSCB 


CDD405 
С9 


CD7DO5 
115С00 
CDD405 
C30000 


I Фе 40 we 99 we 


АКРО: 


x 
56 


[T| e ее we we we we 
x 
ж 


20 
2) 
[т] 
>< 


CALL 
НЭЭ! 


CLOSE ¿CLOSE THE FILE 


; RETURN 


жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 


SUBROUTINE HAFPGe - ADJUSTS DMA ADDRESS 


PUSH 
LHLD 
Во 
DAD 
SHLD 
XCHG 
CALL 
РОР 
RET 


ERREA = 


CALL 
211 
CALL 
УМР 
100H 
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HALE BAGE OF MEMORY 


K > >K >< >< >x >K >< > >< >x ӨҮФЖЖЯЖЖЖЖЖЖЖЖЖЖЖЕЖЖЖЖЖЖЖЖЖЖЖЖЖХЖЖЖЖЖЕЖЖЖЖ 


H ; SAVE 

PAGER 

01210104 

р s ADD 128 TO PAGER 

PAGER RESTORE UPDATED PAGER 
ХЭМ De 

SETDMA ¿SET DMA 

H 


HANA ERRORS ERIT VIA THIS ROUT 
ENTRY: D,z CONTAÍN MESSAGE ADDE 
Е: FOOT TITO DOS 


PRINT ¿PRINT THE MESSAGE 
D,TFCB TEMPORARY FCB 
CLOSE CLOSE THE FILE 
BOOT ;Ь00Т TO DOS 





RL Mk жжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж жж 
КЕМ REDUCE - EXTRACTS FOURIER COEFFICIENTS 

REM OF ODD HARMONICS FROM GIVEN DATA FIle 
AS 
DELTA,T = 85-6 

ше- 5,141592654 

CONPRS- B:CONTROL" 

BRNUNTPISSZ"B:DATA.ASC" 

BUTPUTS-"B:OUTPUT" 

fess =" " 

PERE DATUM.PTSS 

IF END # 1 THEN 200 

МОН 1; ICHNL,FCHNL,SVO,SV1 ,SCANS „SCAN.PERIOD,RECORD.FREQ 
SAN PERIOD = 5САМ.РЕНІОП ж .9765625Е-5 

Pew! "INITIAL ANALOG CHANNEL” ,ICHNL 

PRINT “FINAL ANALOG CHANNEL” ,FCHNL 

PRINT 

PRINT "SCANIVALVE ZERO SETTING” ,SVO 

PRINT "SCANIVALVE ONE SETTING ",SVI 

PRINT 

PRINT “NUMEER OF SCANS ",SCANS 

MeiWi SCAN PERIOD" ,SCAN.PERIOD;” SECONDS” 

ВЕТМТ SCAW RAT&”,1/SCAN.PERIOD:" HZ" 

RECORD. FREG=RECORD.FREQ/I0 

BRUN "RECORDED REFERENCE FREQUENCY ",RECORD.FREQ 

ВЕ Мжжжжжжжжжжжжжжжжжжжжжжжжжжжжж жжжжжжжжжжжжжжжжжжжжжжжжож 
REM READ IN ASCII DATA FILE 
ВЕМжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжжж 
U DAT CFCHANL+]1,SCANS) PHASE CFCHNL+ 1) ACFCHAL+1) ¿BOFCHNL+1) 
RZAD # 13;DUMMY DUMMY ,DUMMY 

PRINT 

POR I= | TO SCANS 

READ #1;TIME 
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OF DO FOREVER */ 


END; 
/* 


END; 
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APPENDIX D 


SAMPLE OUTPUT 


INITIAL ANALOG CHANNEL O 

FINAL ANALOG CHANNEL - 
COORDINATION NUMBER | 
NUMBER OF SCANS 400 
Eee MOD 2.92S6ECE-05 SECONDS 


SUAM RAT = 341.5353 Ас 
ДАНО ПРА РО ЕО ЕЕ п МС hor! 


eevee ОР Ор ТА POINTS 052Р 511 АШ а габ 


ПРЕРАНО 15 FOR HARMONIC 0 

CE NLL COS SI^ шинээ mAS 

О 2.49551] O О 2.455505 
1 2.454с44 О O 2.4540 42 
2 2222-1228 О О en 322,30 
2 22211704 О O 22211:17795 
- саро Т ІІ О О 2.915715 
КОО НЕ CCOSPEFICIENTS FOR HARMOWIC 1 

CHANNEL COS SIN ASE bind 

0 -624,6578 “911525550 О 1046.66 
| Ооо осе "UT etm KR CCIE SO ST 1 046.629 
2 520591 -517.6556 ПЕ 1955. Раб 
É ЕСЭ. ЭЭА ЕО | ӨЗІН о 1046.655 
4 SMS SO -7905v.24189 ‚142625 1046.55 
БЕН ФОЕЕПІСТЕСІ5 FCR HARMONLO 2 

CHANNEL COS SIN BIS Más 

О 1.200115 29 MN 5220025 Suc fS] 
| 1.35226 22054472 со 1055 2.39429 
2 1.54165 Ро 5508] 3.060662 
3 coros o ME 56.0261] өш. E 
- Peo OOF puc M $2.40472 2.02 215 
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APPENDIX E 


OPERATING INSTRUCTIONS 


Вэ C OUTSITION PROCEDURE INSTRUCTIONS 


Шет сетсоплпесс the following with the MDS-800 using the 
appropriate cables: 
* Disk Drive 
t CRI 
* BNC Patch Panel 
* Teletype (optional) 


2. Attach analog sources to the desired patch panel BNC 
Meena using coaxial cables. По to 16 channels may be 
attached. Ensure voltage limits on analog inputs do not 


exceed plus or minus 5 volts. 
3, With disk drive doors open, power up all equipment. 


IS a llene procram diskette in Drive A and a blank or 


uprotected diskette in Drive B, then close the docrs. 


5. Depress the BOOT switch and momentarily depress the 


Бо Swe Ch. 
6. Depress the space bar on the CRT keyboard. 


лэ 
2 


а bp SOOT uSwitch = The EXT will display the 
Боштомшта Message: 324 CPAN VERS 1.3 


гэ 11001127 and a Carriage return. The program will 


respond by displaying the current CONTROL file and ask: 


124 





"ANY CHAWGES?N, 
ee Respond with a Y for yes or a N for no. 


Ec ІС yes, you must hem еа и “the CONTROL file by 
entering: 
tx SD CONTROL Ver 
tat ZA СТ 


Use the editing commands specified in ref. 9. 

11. ТЕ пс, the program will ask for a 4 digit frequency to 
be entered. The decimal point is understood to be 
between the first and second significant digits, 

ex ROTOS is egüivalent to 10.5 Hz; 
12. When ready to record data, enter a carriage return. 


13. Repeat steps ІК and 29 unt: шета CONTROL file 


сата па сасе ard asks "GOOD RUH?". 


ее Еее Y TE You wish tO protect the disk from being 


житеп to. 


ПБ еегіпа a Neill not ргосеси и -" алакесбсе nor will it 


destroy data on the disk. 


RDA (ANALYSIS PROCEDURE INSTRUCTIONS 


|. _улећ the DATA diskette іп Drive В апа the program 
qi а Drive A, Supe ти SCONVER DT MEDATA.xxx: where 
mex 15 спе decimal ID of the data file, 
CONVERT DÀTA.001 


2. When prompted with an А», enter RUN REDUCE. Output will 


appear on the selected consols device. 
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АВРО ОНЕ 


SAMPLE CONTROL FILE 


шид 10221777 

Rue: SIN REDUCTION TEST 
SCANS PER CHANNEL: 400 
SOR PERIOD: 2 

FIRST CHANEL: O 

LAST- CHANNEL: 2 


SCANIVALVE O: 1 
SCANIVALVE O: б 
SCANIVALVE 1: 1 
SCANIVALVE 1: 6 
CHANNEL I = INPUT FROM МАМЕТЕК 


CHANNEL 2AND O2 OUIFUT FTO OR AT TILIER 


DALASOOO = 1052 SIUNAWA VERA нра а 
ШӘ - 2504 SI ые дш SET 
2052. SORA SIN I LENO TT SEI 
50232250 2 22 аде РЫ Т 
e004 = 62 О ОШО ОСТ 
uu» = Tanz О OA El 
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Control Airfoil, Engineer Thesis, Naval Postqraduate 


= — =ч сыш —_ m هة‎ 


Sehnsel, Мопсегеу; June, 1377. 
эс Research “Сора ов Е оп то С9/И 
Peatures and Facilities, 1976. 
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